Dustin J. Mitchell wrote:
On Mon, Sep 13, 2010 at 11:04 AM, Jean-Louis Martineau
<[email protected]> wrote:
Robert, can you try the attached patch?

(only the amoverview hunk is required, right Jean-Louis?)


yes, The correct patch is attached.

Jean-Louis
diff --git a/server-src/amoverview.pl b/server-src/amoverview.pl
index 4f721e5..5dbd625 100644
--- a/server-src/amoverview.pl
+++ b/server-src/amoverview.pl
@@ -195,13 +195,13 @@ my $top_format = "format TOP =\n\n" .
     join(' ', map((/......(..)/)[0], sort keys %dates)) . "\n" .
     "\n.\n";
 
-+ local ($::thishost,$::thisdisk);
+local ($::thishost,$::thisdisk);
 my $out_format = "format STDOUT =\n" .
     "@" . "<" x ($opt_hostwidth - 1) . ' ' .
     "@" . "<" x ($opt_diskwidth - 1) . ' ' .
     '@> ' x scalar(keys %dates) . "\n" .
     join(', ', '$::thishost', '$::thisdisk',
-       map("substr(\$level{\$::thishost}{\$::thisdisk}{'$_'},-2)", sort keys %dates)) . "\n" .
+       map("defined(\$level{\$::thishost}{\$::thisdisk}{'$_'})?substr(\$level{\$::thishost}{\$::thisdisk}{'$_'},-2):'  '", sort keys %dates)) . "\n" .
     ".\n";
 
 eval $top_format;

Reply via email to