[WWcvs] webwork2: use WEBWORK_ROOT to find libdir (not FindBin)

[Sam H. v. a. <we...@ma...>]

Log Message:
-----------
use WEBWORK_ROOT to find libdir (not FindBin)

Modified Files:
--------------
    webwork2/bin:
        pg-append-textbook-tags
        pg-find-tags
        pg-pull

Revision Data
-------------
Index: pg-find-tags
===================================================================
RCS file: /webwork/cvs/system/webwork2/bin/pg-find-tags,v
retrieving revision 1.1
retrieving revision 1.2
diff -Lbin/pg-find-tags -Lbin/pg-find-tags -u -r1.1 -r1.2
--- bin/pg-find-tags
+++ bin/pg-find-tags
@@ -25,8 +25,12 @@
 use Getopt::Long;
 use IO::Handle;
 
-use FindBin;
-use lib "$FindBin::Bin/../lib";
+BEGIN {
+	die "WEBWORK_ROOT not found in environment.\n"
+		unless exists $ENV{WEBWORK_ROOT};
+}
+
+use lib "$ENV{WEBWORK_ROOT}/lib";
 use WeBWorK::NPL qw/gen_find_tags/;
 
 sub main {
Index: pg-append-textbook-tags
===================================================================
RCS file: /webwork/cvs/system/webwork2/bin/pg-append-textbook-tags,v
retrieving revision 1.1
retrieving revision 1.2
diff -Lbin/pg-append-textbook-tags -Lbin/pg-append-textbook-tags -u -r1.1 -r1.2
--- bin/pg-append-textbook-tags
+++ bin/pg-append-textbook-tags
@@ -24,8 +24,12 @@
 use Data::Dumper;# $Data::Dumper::Indent = 0;
 use Getopt::Long;
 
-use FindBin;
-use lib "$FindBin::Bin/../lib";
+BEGIN {
+	die "WEBWORK_ROOT not found in environment.\n"
+		unless exists $ENV{WEBWORK_ROOT};
+}
+
+use lib "$ENV{WEBWORK_ROOT}/lib";
 use WeBWorK::NPL qw/read_tags format_tags/;
 
 sub main {
Index: pg-pull
===================================================================
RCS file: /webwork/cvs/system/webwork2/bin/pg-pull,v
retrieving revision 1.1
retrieving revision 1.2
diff -Lbin/pg-pull -Lbin/pg-pull -u -r1.1 -r1.2
--- bin/pg-pull
+++ bin/pg-pull
@@ -37,8 +37,12 @@
 use Getopt::Long;
 use IO::File;
 
-use FindBin;
-use lib "$FindBin::Bin/../lib";
+BEGIN {
+	die "WEBWORK_ROOT not found in environment.\n"
+		unless exists $ENV{WEBWORK_ROOT};
+}
+
+use lib "$ENV{WEBWORK_ROOT}/lib";
 use WeBWorK::NPL qw/read_textbooks read_tags/;
 
 my %o;