ispman/bin ispman.listVars,1.5,1.6

Update of /cvsroot/ispman/ispman/bin
In directory sc8-pr-cvs1:/tmp/cvs-serv21686

Modified Files:
	ispman.listVars 
Log Message:
not using DN as the hash key. Results are different depending on the spaces etc. Creating a simpler hash to get values from. PS: Wen interface tmpl still needs to be changed

Index: ispman.listVars
===================================================================
RCS file: /cvsroot/ispman/ispman/bin/ispman.listVars,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -d -r1.5 -r1.6
--- ispman.listVars	15 Jan 2004 14:38:27 -0000	1.5
+++ ispman.listVars	16 Jan 2004 17:27:46 -0000	1.6
@@ -20,10 +20,19 @@
 	}
 }
 
+my $ispmanVars;
+
 
 for $module(@$modules){
 	print "Module: $module\n\n";
 	my $vars=$ispman->getConfVars($module);
+	for (keys %$vars){
+		$ispmanVars->{$vars->{$_}{'ispmanVar'}}{'ispmanQuestion'}=$vars->{$_}{'ispmanQuestion'};
+		$ispmanVars->{$vars->{$_}{'ispmanVar'}}{'ispmanVal'}=$vars->{$_}{'ispmanVal'};
+	}
+	
+	
+	
 	my @ispmanVars;
 	my $varDN;
 	
@@ -31,18 +40,11 @@
 	if ($ispman->{'Config'}{'ispmanVarSort'}{$module}){
 		my $varSort=$ispman->{'Config'}{'ispmanVarSort'}{$module};
 		for (@$varSort){
-			# print "$_\n";
-			$varDN=$ispman->getConfVarDN($module, $_);
-			$varDN=~s/ //g;
-			
-			# print "VarDN: ", $varDN, "\n";
-			# print "VarVal: ", $vars->{$varDN}{'ispmanVal'}, "\n";
 			$var=$_;
-			$val=$vars->{$varDN}{'ispmanVal'};
+			$val=$ispmanVars->{$var}{'ispmanVal'};
 			write();
 		}
 	}
-	
 }
 
 	




-------------------------------------------------------
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