New version number

[mirror/userdir-ldap-cgi.git] / machines.cgi

diff --git a/machines.cgi b/machines.cgi
index f01d4e1..3a333fe 100755 (executable)
--- a/machines.cgi
+++ b/machines.cgi
@@ -51,12 +51,13 @@ my (%attrs, @attrorder, %summaryattrs, @summaryorder, %summarylistitems);
 # ditto for summary
 %summaryattrs = ('hostname' => 'Host name',
                 'host'     => 'just for a link',
+                'description' => 'Description',
                 'architecture' => 'Architecture',
                 'status' => 'Status',
                 'access' => 'Access',
                 'sponsor' => 'Sponsor',
                 'purpose' => 'Purpose');
-@summaryorder = qw{hostname architecture sponsor purpose status access};
+@summaryorder = qw{hostname description architecture sponsor purpose status access};
 %summarylistitems = map {$_=>1} qw{purpose sponsor};
 
 # Global settings...
@@ -120,7 +121,7 @@ sub item_uplist($) {
        return $out;
 }
 
-$SIG{__DIE__} = \&DieHandler;
+#$SIG{__DIE__} = \&DieHandler;
 
 my $query = new CGI;
 my $host = lc($query->param('host'));
@@ -205,7 +206,7 @@ if ($output{havehostdata}) {
   $hostdetails .= "<ul>\n";
   foreach $key (@attrorder) {
     if ($output{$key}) {
-      $hostdetails .= "<li><b>$attrs{$key}:</b>$output{$key}\n";
+      $hostdetails .= "<li><b>$attrs{$key}</b>: $output{$key}\n";
     }
   }
   $hostdetails .= "</ul>\n";