[Rt-commit] r11973 - rt/branches/3.8-TESTING/bin

[sunnavy at bestpractical.com]

Author: sunnavy
Date: Tue Apr 29 23:36:33 2008
New Revision: 11973

Modified:
   rt/branches/3.8-TESTING/bin/webmux.pl.in

Log:
forgot to include bin/webmux.pl.in

Modified: rt/branches/3.8-TESTING/bin/webmux.pl.in
==============================================================================
--- rt/branches/3.8-TESTING/bin/webmux.pl.in	(original)
+++ rt/branches/3.8-TESTING/bin/webmux.pl.in	Tue Apr 29 23:36:33 2008
@@ -64,7 +64,20 @@
 
 }
 
-use lib ( "@LOCAL_LIB_PATH@", "@RT_LIB_PATH@" );
+# fix lib paths, some may be relative
+BEGIN {
+    require File::Spec;
+    my @libs = ("@RT_LIB_PATH@", "@LOCAL_LIB_PATH@");
+    for my $lib (@libs) {
+        unless ( File::Spec->file_name_is_absolute($lib) ) {
+            require FindBin;
+            $lib =
+              File::Spec->catfile( $FindBin::Bin, File::Spec->updir, $lib );
+        }
+        unshift @INC, $lib;
+    }
+
+}
 use RT;
 
 package RT::Mason;