# HG changeset patch
# User Robert McIntyre <rlm@mit.edu>
# Date 1320235317 25200
# Node ID f433fae15c5037ad8219cf504a04fbdd15377177
# Parent  6ef9ccf7a17ee7b2111ac985dd645ad4b48a3eb2
made auto-weave work on all projects

diff -r 6ef9ccf7a17e -r f433fae15c50 auto-weave.pl
--- a/auto-weave.pl	Wed Oct 26 05:13:16 2011 -0700
+++ b/auto-weave.pl	Wed Nov 02 05:01:57 2011 -0700
@@ -7,11 +7,13 @@
 my $inotify = new Linux::Inotify2
   or die "unable to create new inotify object: $!";
 
-@org_files =  glob("./org/*.org");
 
-$" = "\n";
-print "@org_files\n";
+$org_files = `find /home/r/proj -name "*.org" -print0`;
+@org_files = split /\0/, $org_files;
 
+#@org_files =  glob("./org/*.org");
+
+for $file(@org_files){print "$file\n";}
 $ignore_next = 0;