ispman/ispman-web/cgi-bin/tmpl/modules editModule.tmpl,1.7,1.8

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

Modified Files:
	editModule.tmpl 
Log Message:
removed all those nasty ^Ms

Folks! Try to avoid windows editors when editing ispman files



Index: editModule.tmpl
===================================================================
RCS file: /cvsroot/ispman/ispman/ispman-web/cgi-bin/tmpl/modules/editModule.tmpl,v
retrieving revision 1.7
retrieving revision 1.8
diff -u -d -r1.7 -r1.8
--- editModule.tmpl	16 Jan 2004 17:39:03 -0000	1.7
+++ editModule.tmpl	21 Feb 2004 21:31:28 -0000	1.8
@@ -11,43 +11,43 @@
         <perl>
         my $text="";
 		my $vars=$ispman->getConfVars($r->param('module'));
-
-		for (keys %$vars){
-			$ispmanVars->{$vars->{$_}{'ispmanVar'}}{'ispmanQuestion'}=$vars->{$_}{'ispmanQuestion'};
-			$ispmanVars->{$vars->{$_}{'ispmanVar'}}{'ispmanVal'}=$vars->{$_}{'ispmanVal'};
-			$ispmanVars->{$vars->{$_}{'ispmanVar'}}{'ispmanVarAlias'}=$vars->{$_}{'ispmanVarAlias'};
-		}
-
-
-		my $module=$r->param("module");
-		if ($ispman->{'Config'}{'ispmanVarSort'}{$module}){
-			my $varSort=$ispman->{'Config'}{'ispmanVarSort'}{$module};
-			my ($varDN, $ispmanQuestion, $ispmanVarAlias, $ispmanVar, $ispmanVal);
-		
-			for (@$varSort){
-				
-				$ispmanVar=$_;
-				$ispmanVal=$ispmanVars->{$_}{'ispmanVal'};
-				$ispmanQuestion=$ispmanVars->{$_}{'ispmanQuestion'};
-				$ispmanVarAlias=$ispmanVars->{$_}{'ispmanVarAlias'};
-
+
+		for (keys %$vars){
+			$ispmanVars->{$vars->{$_}{'ispmanVar'}}{'ispmanQuestion'}=$vars->{$_}{'ispmanQuestion'};
+			$ispmanVars->{$vars->{$_}{'ispmanVar'}}{'ispmanVal'}=$vars->{$_}{'ispmanVal'};
+			$ispmanVars->{$vars->{$_}{'ispmanVar'}}{'ispmanVarAlias'}=$vars->{$_}{'ispmanVarAlias'};
+		}
+
+
+		my $module=$r->param("module");
+		if ($ispman->{'Config'}{'ispmanVarSort'}{$module}){
+			my $varSort=$ispman->{'Config'}{'ispmanVarSort'}{$module};
+			my ($varDN, $ispmanQuestion, $ispmanVarAlias, $ispmanVar, $ispmanVal);
+		
+			for (@$varSort){
+				
+				$ispmanVar=$_;
+				$ispmanVal=$ispmanVars->{$_}{'ispmanVal'};
+				$ispmanQuestion=$ispmanVars->{$_}{'ispmanQuestion'};
+				$ispmanVarAlias=$ispmanVars->{$_}{'ispmanVarAlias'};
+
 				$text.="<TR><TD COLSPAN=2 bgcolor=WHITE><I>$ispmanQuestion</i></td></tr>\n";
 				$text.=qq|
 				<TR>
 				<TD class=menuheader>@{[($ispmanVarAlias)?$ispmanVarAlias:$ispmanVar]}</td>
 				<TD><INPUT TYPE="TEXT" NAME="$ispmanVar" size=40 value="$ispmanVal"></td>
 				</tr>|;
-
-			}
-		} else {
-			for (keys %$vars){
+
+			}
+		} else {
+			for (keys %$vars){
 				$text.="<TR><TD COLSPAN=2 bgcolor=WHITE><I>$vars->{$_}{'ispmanQuestion'}</i></td></tr>\n";
 				$text.=qq|
 				<TR>
 				<TD class=menuheader>@{[($vars->{$_}{'ispmanVarAlias'})?$vars->{$_}{'ispmanVarAlias'}:$vars->{$_}{'ispmanVar'}]}</td>
 				<TD><INPUT TYPE="TEXT" NAME="$vars->{$_}{'ispmanVar'}" size=40 value="$vars->{$_}{'ispmanVal'}"></td>
 				</tr>|;
-			}
+			}
 		}
         $text
         </perl>



-------------------------------------------------------
SF.Net is sponsored by: Speed Start Your Linux Apps Now.
Build and deploy apps & Web services for Linux with
a free DVD software kit from IBM. Click Now!
http://ads.osdn.com/?ad_id=1356&alloc_id=3438&op=click