Index: trunk/Ohana/etc/mkdist
===================================================================
--- trunk/Ohana/etc/mkdist	(revision 3392)
+++ trunk/Ohana/etc/mkdist	(revision 4739)
@@ -1,11 +1,18 @@
 #!/usr/bin/env perl
 
-$dist = "distributions.txt";
+$distdir = "distributions";
 
 if (@ARGV != 2) { die "USAGE: mkdist (group) (version)\n"; }
 
-open (FILE, $dist) || die "ERROR: can't open distribution file\n";
-@list = <FILE>;
-close (FILE);
+@files = <$distdir/*.dst>;
+foreach $file (@files) {
+    open (FILE, $file) || die "ERROR: can't open distribution file\n";
+    @sublist = <FILE>;
+    close (FILE);
+    push @list, @sublist;
+    $Ns = @sublist;
+    $Nt = @list;
+    print STDERR "read $Ns from $file, $Nt so far\n";
+}
 
 $group = $ARGV[0];
@@ -67,5 +74,5 @@
 sub vsystem {
     print STDERR "@_\n";
-    $status = system ("@_");
+    # $status = system ("@_");
     $status;
 }
