[PATCH] help the assembler find itself

[Steve Fink]

Is the new assembler going to land soon? If not, this has been helpful
to me.

-- 
Gimme a job! http://foxglove.dnsalias.org/~sfink/job.html
C, perl, networking, performance optimization, Java, XML.

Index: assemble.pl
===================================================================
RCS file: /home/perlcvs/parrot/assemble.pl,v
retrieving revision 1.51
diff -u -r1.51 assemble.pl
--- assemble.pl 30 Jan 2002 18:02:15 -0000      1.51
+++ assemble.pl 29 Mar 2002 06:04:15 -0000
@@ -6,7 +6,8 @@
 #
 
 use strict;
-use lib 'lib';
+use FindBin;
+use lib "$FindBin::Bin/lib";
 use Parrot::Assembler;
 
 init_assembler(@ARGV);