[Sisuite-devel] si_monitor patch

[Bernard Li]

Hi Andrea:

 

Attached is a "cosmetic" patch for si_monitor - mainly to do with formatting.  I changed the text a little bit such that it looks better.  Don't have a good idea regarding the wordwrap though since the same text is used by the command line as well as the GUI.

 

If you are okay with the patch, I'll check it in.

 

BTW, 3.7.3 now works great in my home machine (x86) - I can continue testing at home now ;-)

 

Thanks,

 

Bernard

Index: sbin/si_monitortk
===================================================================
--- sbin/si_monitortk   (revision 3494)
+++ sbin/si_monitortk   (working copy)
@@ -24,10 +24,11 @@
 use Getopt::Long qw(:config no_ignore_case bundling);
 
 my $version_info = << "EOF";
-$program_name\n(part of SystemImager) v$VERSION
+$program_name (part of SystemImager) v$VERSION
 
 Copyright (C) 2005 Andrea Righi <[EMAIL PROTECTED]>
 Copyright (C) 2005-2006 Bernard Li <[EMAIL PROTECTED]>
+
 This is free software; see the source for copying conditions.  There is NO
 warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 EOF
@@ -249,17 +250,18 @@
 );
 my $DIALOG_NO_CLIENTS = $window->Dialog(
        -title          => "Clear all collected clients",
-       -bitmap             => 'warning',
+       -bitmap         => 'warning',
        -default_button => 'OK',
        -buttons        => ['OK'],
        -text           => "No clients collected.",
 );
 my $DIALOG_ABOUT = $window->Dialog(
        -title          => "About $program_name",
-       -bitmap                 => 'info',
+       -bitmap         => 'info',
        -default_button => 'OK',
        -buttons        => ['OK'],
-    -wraplength     => '4i',
+       -font           => $FONT,
+       -wraplength     => '4i',
        -text           => "$version_info",
 );
 $help_menu->cget(-menu)->entryconfigure('About',
@@ -279,15 +281,15 @@
 # Create the table of nodes status.
 $tab = $window->Scrolled(
        'HList',
-       -header         => 1,
-       -columns        => 12,
-       -scrollbars     => 'se',
-       -width          => 110,
-       -height         => 25,
-       -selectmode     => 'browse',
+       -header           => 1,
+       -columns          => 12,
+       -scrollbars       => 'se',
+       -width            => 110,
+       -height           => 25,
+       -selectmode       => 'browse',
        -selectbackground => 'yellow',
-       -command        => \&show_virtual_console,
-    -browsecmd  => \&update_selected_mac,
+       -command          => \&show_virtual_console,
+       -browsecmd        => \&update_selected_mac,
 )->grid(qw/-sticky nsew/);
 
 # Create the tab item styles.
Index: sbin/si_monitor
===================================================================
--- sbin/si_monitor     (revision 3494)
+++ sbin/si_monitor     (working copy)
@@ -24,6 +24,7 @@
 
 Copyright (C) 1999-2001 Andrea Righi <[EMAIL PROTECTED]>
 Copyright (C) 2005-2006 Bernard Li <[EMAIL PROTECTED]>
+
 This is free software; see the source for copying conditions.  There is NO
 warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 EOF