e-smith-base/sme7/e-smith-base-4.18.0-infobox.patch2

diff -Nur -x '*.orig' -x '*.rej' e-smith-base-4.18.0/root/usr/lib/perl5/site_perl/esmith/console/perform_backup.pm mezzanine_patched_e-smith-base-4.18.0/root/usr/lib/perl5/site_perl/esmith/console/perform_backup.pm
--- e-smith-base-4.18.0/root/usr/lib/perl5/site_perl/esmith/console/perform_backup.pm   2007-02-23 08:31:47.000000000 -0700
+++ mezzanine_patched_e-smith-base-4.18.0/root/usr/lib/perl5/site_perl/esmith/console/perform_backup.pm 2007-02-23 08:31:02.000000000 -0700
@@ -114,18 +114,10 @@
        
     }
 
-# XXX-FIXME
-# We call dialog directly (rather than through the screen function)
-# as we don't want the --clear parameter passed by screen().
-# Appropriate magic can clean this up.
-system(
-       "/usr/bin/dialog",
-       "--backtitle", $console->backtitle,
-       "--title", gettext("Preparing for backup"),
-       "--infobox", gettext("Please standby while the system is " .
-          "prepared for backup ..."),
-       8, esmith::console::SCREEN_COLUMNS,
-      );
+    $console->infobox(
+           title => gettext("Preparing for backup"),
+           text => gettext("Please stand by while the system is prepared for backup..."),
+          );
 
     my $backup_size = 0;
     system("/sbin/e-smith/signal-event", "pre-backup");
1	slords	1.1	diff -Nur -x '.orig' -x '.rej' e-smith-base-4.18.0/root/usr/lib/perl5/site_perl/esmith/console/perform_backup.pm mezzanine_patched_e-smith-base-4.18.0/root/usr/lib/perl5/site_perl/esmith/console/perform_backup.pm
2			--- e-smith-base-4.18.0/root/usr/lib/perl5/site_perl/esmith/console/perform_backup.pm 2007-02-23 08:31:47.000000000 -0700
3			+++ mezzanine_patched_e-smith-base-4.18.0/root/usr/lib/perl5/site_perl/esmith/console/perform_backup.pm 2007-02-23 08:31:02.000000000 -0700
4			@@ -114,18 +114,10 @@
5
6			}
7
8			-# XXX-FIXME
9			-# We call dialog directly (rather than through the screen function)
10			-# as we don't want the --clear parameter passed by screen().
11			-# Appropriate magic can clean this up.
12			-system(
13			- "/usr/bin/dialog",
14			- "--backtitle", $console->backtitle,
15			- "--title", gettext("Preparing for backup"),
16			- "--infobox", gettext("Please standby while the system is " .
17			- "prepared for backup ..."),
18			- 8, esmith::console::SCREEN_COLUMNS,
19			- );
20			+ $console->infobox(
21			+ title => gettext("Preparing for backup"),
22			+ text => gettext("Please stand by while the system is prepared for backup..."),
23			+ );
24
25			my $backup_size = 0;
26			system("/sbin/e-smith/signal-event", "pre-backup");