# HG changeset patch
# User Robert McIntyre <rlm@mit.edu>
# Date 1319554848 25200
# Node ID 24ff8a9c76c483fa6b9e3d5f3030b858ae97ac92
# Parent  83e16df2288a72a569f52dcb53ae6ea9a20cdc7e
all day for three lines

diff -r 83e16df2288a -r 24ff8a9c76c4 auto-weave.pl
--- a/auto-weave.pl	Tue Oct 25 07:52:02 2011 -0700
+++ b/auto-weave.pl	Tue Oct 25 08:00:48 2011 -0700
@@ -1,8 +1,8 @@
 #!/usr/bin/perl
 
 use Linux::Inotify2;
-use AnyEvent;
-
+use WWW::Mechanize::Firefox;
+my $mech = WWW::Mechanize::Firefox->new();
 
 my $inotify = new Linux::Inotify2
   or die "unable to create new inotify object: $!";
@@ -40,6 +40,7 @@
     $path =~ s|org|html|g;
     print ("$path\n");
     #system ("firefox $path");
+    $mech->get($path);
     $ignore_next = 1;
 
 });