[Da-tools-commits] ./da-tools/userdir-ldap-cgi-common r88: Make machines.cgi display the purpose attribute from LDAP

[Marc 'HE' Brockschmidt]

------------------------------------------------------------
revno: 88
committer: Marc 'HE' Brockschmidt <he at debian.org>
branch nick: userdir-ldap-cgi-common
timestamp: Fri 2008-03-14 21:17:51 +0100
message:
  Make machines.cgi display the purpose attribute from LDAP
modified:
  machines.cgi
-------------- next part --------------
=== modified file 'machines.cgi'
--- a/machines.cgi	2006-12-27 22:00:04 +0000
+++ b/machines.cgi	2008-03-14 20:17:51 +0000
@@ -36,6 +36,7 @@
 	  'sshrsahostkey' => 'SSH host key',
 	  'sshrsahostfprint' => 'SSH host fingerprint',
 	  'description' => 'Description',
+	  'purpose' => 'purposes of this server',
 #	  'createtimestamp' => 'Entry created',
 #	  'modifytimestamp' => 'Entry modified'
 	 );
@@ -44,7 +45,7 @@
 @attrorder = qw(hostname admin architecture distribution access
                 sponsor sponsor-admin location machine memory
 	        disk bandwidth status notes sshrsahostkey sshrsahostfprint
-		description);
+		description purpose);
 
 # ditto for summary
 %summaryattrs = ('hostname' => 'Host name',
@@ -144,6 +145,9 @@
         $output{sponsor} .= $sponsor;
       }
     }
+
+	#Reformat purposes to be pleasing for the human eye:
+	$output{purpose} = join(",", @{$data->{purpose}});
     
     $selected = " selected ";    
   }