Index: branches/ipp-magic-v0/psconfig/pscheckperl
===================================================================
--- branches/ipp-magic-v0/psconfig/pscheckperl	(revision 21062)
+++ branches/ipp-magic-v0/psconfig/pscheckperl	(revision 21497)
@@ -1,3 +1,14 @@
 #!/usr/bin/env perl
+
+# Get the CVS tag
+$cvsNameString= '$Name: not supported by cvs2svn $';
+if ( $cvsNameString =~ /\$Name: not supported by cvs2svn $/ ) {
+    $cvsTag = $1;
+} 
+else { die "ERROR: cannot parse CVS tag string\n"; }
+# Strip off release version number if present
+if ( $cvsTag =~ /^(.+)\-\d*$/ ) {
+    $cvsTag = $1;
+}
 
 $tagsets = "tagsets";
@@ -32,6 +43,6 @@
 
 if ( @ARGV == 0) { 
-    @list = <$tagsets/*.perl>;
-    $file = $list[-1];
+    $defaultversion=$cvsTag;
+    $file="$tagsets/$defaultversion.perl";
 } else {
     $file = "$tagsets/$ARGV[0].perl";