ispman/ispman-web/cgi-bin/tmpl/hosts editHost.tmpl,1.9,1.10 manageHosts.tmpl,1.9,1.10

Update of /cvsroot/ispman/ispman/ispman-web/cgi-bin/tmpl/hosts
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv21146/ispman-web/cgi-bin/tmpl/hosts

Modified Files:
	editHost.tmpl manageHosts.tmpl 
Log Message:
made ispmanHostAlias multivalued

Index: editHost.tmpl
===================================================================
RCS file: /cvsroot/ispman/ispman/ispman-web/cgi-bin/tmpl/hosts/editHost.tmpl,v
retrieving revision 1.9
retrieving revision 1.10
diff -u -d -r1.9 -r1.10
--- editHost.tmpl	28 Apr 2003 14:47:23 -0000	1.9
+++ editHost.tmpl	30 May 2004 22:25:59 -0000	1.10
@@ -11,8 +11,8 @@
 <form>
 <table>
 <tr>
-    <td><perl>_("Host Alias")</perl></td>
-    <td><input type=text name=ispmanHostAlias value="<perl>$host->{'ispmanHostAlias'}</perl>"></td>
+    <td><perl>_("Host Aliases")</perl></td>
+    <td><textarea rows="3" cols="18" name=ispmanHostAlias><perl>join "\n", $ispman->as_array($host->{'ispmanHostAlias'})</perl></textarea></td>
 </tr>
 <tr>
     <td><perl>_("IP address")</perl></td>

Index: manageHosts.tmpl
===================================================================
RCS file: /cvsroot/ispman/ispman/ispman-web/cgi-bin/tmpl/hosts/manageHosts.tmpl,v
retrieving revision 1.9
retrieving revision 1.10
diff -u -d -r1.9 -r1.10
--- manageHosts.tmpl	28 Apr 2003 14:47:23 -0000	1.9
+++ manageHosts.tmpl	30 May 2004 22:25:59 -0000	1.10
@@ -29,8 +29,11 @@
 my $text="";
 for  $host(keys %$hosts){
     my $hostname=$hosts->{$host}{'ispmanHostName'};
-    my $name=$hosts->{$host}{'ispmanHostName'} . " ($hosts->{$host}{'ispmanHostAlias'})";
-
+    my $name=$hosts->{$host}{'ispmanHostName'};
+    my @aliases=$ispman->as_array($hosts->{$host}{'ispmanHostAlias'});
+    if (@aliases) {
+       $name.=" (" . join(", ", @aliases) . ")";
+    }
     
     my $ip=$hosts->{$host}{'ispmanHostIp'}|| "undefined";
     my $description=$hosts->{$host}{'ispmanHostInfo'}|| "undefined";
@@ -66,8 +69,8 @@
     <td><a href="javascript:alert('<perl>_("This is the hostname of the machine. You can find the correct hostname as ispman-agent sees it with the command ispman.myhostname")</perl>')">?</a></td>
 </tr>
 <tr>
-    <td><perl>_("Host Alias")</perl></td>
-    <td><input type=text name=ispmanHostAlias value=""></td>
+    <td><perl>_("Host Aliases")</perl></td>
+    <td><textarea rows="3" cols="18" name=ispmanHostAlias></textarea></td>
 </tr>
 <tr><td><perl>_("IP Address")</perl></td>
     <td><input type=text name=ispmanHostIp value=""></td>



-------------------------------------------------------
This SF.Net email is sponsored by: Oracle 10g
Get certified on the hottest thing ever to hit the market... Oracle 10g. 
Take an Oracle 10g class now, and we'll give you the exam FREE.
http://ads.osdn.com/?ad_id=3149&alloc_id=8166&op=click