Changeset 206 for trunk/bin

Timestamp:

04/04/07 19:01:36 (1 year ago)

Author:

ingy

Message:

 r3749@skinny-2:  ingy | 2007-04-04 18:04:20 +0900
 refo

Files:

• trunk/bin/k2-make-src (modified) (2 diffs)

trunk/bin/k2-make-src

@@ -6 +6 @@
-use lib abs_path('lib');
-use IO::All;
+use XXX;
-
-# Get a list of all dists in system.
+XXX my @dists = map {
+    $_->name;
+} grep {
+    -e "$_/lib";
+} io('src')->All_Dirs;
+
+
-# For each dist, find all modules in dist
-# For each module:
@@ -16 +24 @@
-#   Link all src files into the base/ tree
-#   Report all collisions
+
+__END__
-
-@ARGV == 1 or die usage();