ispman/ispman-web/cgi-bin/tmpl/vhosts edit.tmpl,1.18,1.19
| Newsgroups | gmane.comp.isp.ispman.cvs |
|---|---|
| Message-ID | <[email protected]> |
Update of /cvsroot/ispman/ispman/ispman-web/cgi-bin/tmpl/vhosts
In directory sc8-pr-cvs1:/tmp/cvs-serv3078/ispman-web/cgi-bin/tmpl/vhosts
Modified Files:
edit.tmpl
Log Message:
only show old serveralias form on old serveralias attributes
Index: edit.tmpl
===================================================================
RCS file: /cvsroot/ispman/ispman/ispman-web/cgi-bin/tmpl/vhosts/edit.tmpl,v
retrieving revision 1.18
retrieving revision 1.19
diff -u -d -r1.18 -r1.19
--- edit.tmpl 8 Jan 2004 00:08:26 -0000 1.18
+++ edit.tmpl 17 Jan 2004 16:30:37 -0000 1.19
@@ -116,26 +116,32 @@
</td>
</tr>
+<perl>
+ # FIXME
+ # This code is obsolete and should be removed when migration to new ServerAliases branch is complete
-<tr>
- <td valign=top>Server Aliases<br>(Optional)</td>
- <td colspan=2>
- <textarea cols=35 rows=3 name=ispmanVhostServerAlias><perl>
- my $text="";
- if (ref $ispman->{'vhost'}->{"ispmanVhostServerAlias"} eq "ARRAY"){
+ if ($ispman->{'vhost'}->{"ispmanVhostServerAlias"}) {
+ my $text="";
+ $text="
+ <tr>
+ <td valign=top>Server Aliases<br>(Optional)</td>
+ <td colspan=2>
+ <textarea cols=35 rows=3 name=ispmanVhostServerAlias>";
+
+ if (ref $ispman->{'vhost'}->{"ispmanVhostServerAlias"} eq "ARRAY"){
my @aliases=@{$ispman->{'vhost'}->{"ispmanVhostServerAlias"}};
for (@aliases){
$text.= "$_\n";
}
- } else {
- $text=$ispman->{'vhost'}->{"ispmanVhostServerAlias"};
- }
+ } else {
+ $text.=$ispman->{'vhost'}->{"ispmanVhostServerAlias"};
+ }
-
- $text;
- </perl></textarea>
- </td>
-</tr>
+ $text.="</textarea></td></tr>";
+
+ $text;
+ }
+</perl>
<tr>
<td valign=top>Extra configurations<br>(Optional)</td>
-------------------------------------------------------
The SF.Net email is sponsored by EclipseCon 2004
Premiere Conference on Open Tools Development and Integration
See the breadth of Eclipse activity. February 3-5 in Anaheim, CA.
http://www.eclipsecon.org/osdn