Index: trunk/psModules/src/objects/mksource.pl
===================================================================
--- trunk/psModules/src/objects/mksource.pl	(revision 31670)
+++ trunk/psModules/src/objects/mksource.pl	(revision 32347)
@@ -14,7 +14,10 @@
 
 # see if we can add in PS1_DV* and PS1_SV* as well...
-@cmfmodes = ("PS1_V1", 1,
+%cmfmodes = ("PS1_V1", 1,
 	     "PS1_V2", 2,
 	     "PS1_V3", 3);
+
+print "1: $cmfmodes{1}\n";
+print "PS1_V1: $cmfmodes{'PS1_V1'}\n";
 
 open (FILE, "$template") || die "failed to open template $template\n";
@@ -50,15 +53,19 @@
 
     if ($gtMode) {
+	# print "gtMode : $line\n";
 	$thisLevel = $cmfmodes{$gtMode};
 	$myLevel = $cmfmodes{$cmfmode};
-	if ($thisLevel <= $myLevel) { next; }
-	$line =~ s|\@<\S*\@\s*||;
+	print "gtMode : $gtMode vs $cmfmode, $thisLevel, $myLevel\n";
+	if ($myLevel <= $thisLevel) { next; }
+	$line =~ s|\@>\S*\@\s*||;
     }
 
     if ($ltMode) {
+	# print "ltMode : $line\n";
 	$thisLevel = $cmfmodes{$ltMode};
 	$myLevel = $cmfmodes{$cmfmode};
-	if ($thisLevel >= $myLevel) { next; }
-	$line =~ s|\@>\S*\@\s*||;
+	print "ltMode : $ltMode vs $cmfmode, $thisLevel, $myLevel\n";
+	if ($myLevel >= $thisLevel) { next; }
+	$line =~ s|\@<\S*\@\s*||;
     }