===================================================================
RCS file: /cvs/openbsd/fill_chroot/Attic/perl_to_chroot,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- openbsd/fill_chroot/Attic/perl_to_chroot	2005/12/21 18:04:06	1.1
+++ openbsd/fill_chroot/Attic/perl_to_chroot	2005/12/21 18:06:32	1.2
@@ -1,10 +1,10 @@
 #!/bin/sh
-# $RedRiver$
+# $RedRiver: perl_to_chroot,v 1.1 2005/12/21 18:04:06 andrew Exp $
 
 PERLLIBS=`ldd /usr/bin/perl | cut -d ' ' -f 7 | sed -e 's/:$//'`
-CHROOT=/home/andrew/www
+CHROOT=${CHROOT:=/home/andrew/www}
 
-for f in ${PERLLIBS} /usr/libdata/perl5/ /usr/local/libdata/perl5; do
+for f in ${PERLLIBS} /usr/libdata/perl5 /usr/local/libdata/perl5; do
   DESTDIR=${CHROOT}`dirname ${f}`
 
   if [ ! -d ${DESTDIR} ]; then
@@ -21,4 +21,3 @@
   cp ${RECURSE} ${f} ${DESTDIR}
 
 done
-