diff --git a/src/warden-server/lib/Warden.pm b/src/warden-server/lib/Warden.pm index a0569698da3bda5ec3144adc90f86749d225dc28..d9edf83541a479290119b12e833d20b6cce1b9cd 100755 --- a/src/warden-server/lib/Warden.pm +++ b/src/warden-server/lib/Warden.pm @@ -23,8 +23,8 @@ use SOAP::Lite; use Carp; use File::Basename; -my $basedir = "/opt/warden-server/"; -use lib $basedir . "lib"; +my $lib = File::Basename::dirname(__FILE__); +use lib $lib; use WardenCommon; @@ -33,8 +33,8 @@ use WardenCommon; # VARIABLES ################################################################################ our $VERSION = "2.2"; -my $etc = $basedir . "etc"; -our $FILENAME = File::Basename::basename($0); +our $FILENAME = File::Basename::basename(__FILE__); +my $etc = "$lib/../etc"; diff --git a/src/warden-server/sh/install.sh b/src/warden-server/sh/install.sh index 3fa95343c3f274098131351fe2f1a524deb13c47..92fdd8bf7b96cfa25a6a16015eab0663d51a1a05 100755 --- a/src/warden-server/sh/install.sh +++ b/src/warden-server/sh/install.sh @@ -248,19 +248,6 @@ PerlSwitches -I $lib } -changeServerPath() -{ - echo -n "Update server prefix path ... "; - perl -pi -e "s#/opt#${prefix}#" ${lib}/Warden.pm 2> $err; ret_val=`echo $?` - - if [ $ret_val -eq 0 ]; then - echo "OK" - else - errClean - fi -} - - createSymlinks() { echo "Creating symbolic links ..." @@ -341,9 +328,6 @@ makeServerConf # create Apache configuration file makeApacheConf -# update prefix in lib directory path -changeServerPath - # crate symlinks from warden server bin directory to /usr/local/bin createSymlinks