From ed63b17af86c3d58e819f31b49c82a08828d4c95 Mon Sep 17 00:00:00 2001
From: Francois Pons <fpons@mandriva.com>
Date: Fri, 13 Apr 2001 10:10:08 +0000
Subject: make sure update-menus is called after installing cups related
 packages.

---
 perl-install/install_steps_interactive.pm | 9 +++++++--
 1 file changed, 7 insertions(+), 2 deletions(-)

diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm
index fdc023164..64ded482c 100644
--- a/perl-install/install_steps_interactive.pm
+++ b/perl-install/install_steps_interactive.pm
@@ -869,8 +869,13 @@ sub configurePrinter {
     $printer->{PAPERSIZE} = $o->{lang} eq 'en' ? 'letter' : 'a4';
     printerdrake::main($printer, $o, $ask_multiple_printer,
 		       sub { $o->pkg_install(@_) }, sub { install_interactive::upNetwork($o, 'pppAvoided') });
-    
-    $o->pkg_install_if_requires_satisfied('Mesa-common', 'xpp', 'libqtcups2', 'qtcups', 'kups') if !is_empty_hash_ref($printer->{configured}) || pkgs::packageFlagInstalled(pkgs::packageByName($o->{packages}, 'cups'));
+
+    if (!is_empty_hash_ref($printer->{configured}) || pkgs::packageFlagInstalled(pkgs::packageByName($o->{packages}, 'cups'))) {
+	$o->pkg_install_if_requires_satisfied('Mesa-common', 'xpp', 'libqtcups2', 'qtcups', 'kups') ;
+
+	#- call update-menus at the end of these package installation, as some menu entries may have been added.
+	run_program::rooted($o->{prefix}, "update-menus");
+    }
 }
 
 #------------------------------------------------------------------------------
-- 
cgit v1.2.1