Gallery2: Use FindBin to find libraries

diff --git a/gal2/gal-cache b/gal2/gal-cache
index 5accb3fd58dace7c14bb43e7a01f71c84f4aed70..591a1cee3082e86d1778a06dbf43f63bd70ca8fb 100755 (executable)
--- a/gal2/gal-cache
+++ b/gal2/gal-cache
@@ -5,7 +5,8 @@
 use strict;
 use warnings;
 
-use lib '/home/mj/web/gal2';
+use FindBin;
+use lib $FindBin::Bin;
 use UCW::Gallery qw(%CF);
 
 use Image::Magick;

diff --git a/gal2/gal-gen b/gal2/gal-gen
index 3c1a6e98a81752dde349b14ae5816964b4d52310..1e7c3dd6d1562038f93ebf8ddbafdb5102b60b76 100755 (executable)
--- a/gal2/gal-gen
+++ b/gal2/gal-gen
@@ -5,7 +5,8 @@
 use strict;
 use warnings;
 
-use lib '/home/mj/web/gal2';
+use FindBin;
+use lib $FindBin::Bin;
 use UCW::Gallery qw(%CF);
 
 use Image::Magick;

diff --git a/gal2/gal-metacat b/gal2/gal-metacat
index 44889af0fe3e5bc37aab159dd779336e5c7bb0f9..78e3f8593306d8998400bd5d222b405571b4d664 100755 (executable)
--- a/gal2/gal-metacat
+++ b/gal2/gal-metacat
@@ -5,7 +5,8 @@
 use strict;
 use warnings;
 
-use lib '/home/mj/web/gal2';
+use FindBin;
+use lib $FindBin::Bin;
 use UCW::Gallery;
 use Data::Dumper;
 

diff --git a/gal2/gal-scan b/gal2/gal-scan
index aa286aff234d6b5a5729213014e5f92f3a441708..2cccfe13c82c6f4e2cdc373cef03eb146c497bbb 100755 (executable)
--- a/gal2/gal-scan
+++ b/gal2/gal-scan
@@ -5,7 +5,8 @@
 use strict;
 use warnings;
 
-use lib '/home/mj/web/gal2';
+use FindBin;
+use lib $FindBin::Bin;
 use UCW::Gallery qw(%CF);
 
 use File::Spec;