Changeset 12142 for trunk/psconfig/psdist

Timestamp:

Mar 1, 2007, 11:14:21 AM (19 years ago)

Author:

eugene

Message:

various fixes to distribution tools

File:

• trunk/psconfig/psdist (modified) (2 diffs)

trunk/psconfig/psdist

@@ -212 +212 @@
 
 sub list_distributions {
-    @list = <$tagsets/*.dst>;
+    @list = <$tagsets/*.dist>;
     foreach $line (@list) {
         chomp $line;
-        ($dist) = $line =~ m|$tagsets/(\S*).dst|;
+        ($dist) = $line =~ m|$tagsets/(\S*).dist|;
         print STDERR "$dist\n";
     }
@@ -224 +224 @@
     # open and read the distribution file
     # results go into @cvsname, @branchtag, @branchver, @mode
-    $file = "$tagsets/$ARGV[0].dst";
+    $file = "$tagsets/$ARGV[0].dist";
     open (FILE, $file) || die "ERROR: can't open distribution file $file\n";
     @list = <FILE>;