diff --git a/bin/ADMIN_keepalive_ALL.pl b/bin/ADMIN_keepalive_ALL.pl index 2640a750..6107dda8 100644 --- a/bin/ADMIN_keepalive_ALL.pl +++ b/bin/ADMIN_keepalive_ALL.pl @@ -284,6 +284,7 @@ if ($DB) {print "double check that processes are not running...\n";} sleep(1); +`PERL5LIB="$PATHhome/libs"; export PERL5LIB`; ### you may have to use a different ps command if you're not using Slackware Linux # @psoutput = `ps -f -C AST_update --no-headers`; # @psoutput = `ps -f -C AST_updat* --no-headers`; diff --git a/bin/start_asterisk_boot.pl b/bin/start_asterisk_boot.pl index 03a735ab..9b44adc7 100644 --- a/bin/start_asterisk_boot.pl +++ b/bin/start_asterisk_boot.pl @@ -19,6 +19,8 @@ foreach(@conf) { $line = $conf[$i]; $line =~ s/ |>|\n|\r|\t|\#.*|;.*//gi; + if ( ($line =~ /^PATHhome/) && ($CLIhome < 1) ) + {$PATHhome = $line; $PATHhome =~ s/.*=//gi;} if ( ($line =~ /^VARserver_ip/) && ($CLIserver_ip < 1) ) {$VARserver_ip = $line; $VARserver_ip =~ s/.*=//gi;} if ( ($line =~ /^VARDB_server/) && ($CLIDB_server < 1) ) @@ -34,6 +36,8 @@ foreach(@conf) $i++; } +`PERL5LIB="$PATHhome/libs"; export PERL5LIB`; + use DBI; $dbhA = DBI->connect("DBI:mysql:$VARDB_database:$VARDB_server:$VARDB_port", "$VARDB_user", "$VARDB_pass") diff --git a/docs/BASE_INSTALL.txt b/docs/BASE_INSTALL.txt index 8cf52542..64e47411 100644 --- a/docs/BASE_INSTALL.txt +++ b/docs/BASE_INSTALL.txt @@ -529,6 +529,9 @@ PHASE 5: ADDING STARTUP ENTRIES FOR ASTGUICLIENT/VICIDIAL SCRIPTS - vi /etc/rc.d/rc.local - add the following entries(here's what we used): +### Path to local asterisk-perl_0.08 module if needed +PERL5LIB="/usr/share/astguiclient/libs"; export PERL5LIB + ### start time server /usr/local/bin/ntpdate -u 18.145.0.30 /usr/sbin/ntpd diff --git a/docs/SCRATCH_INSTALL.txt b/docs/SCRATCH_INSTALL.txt index c4d714be..cb0df866 100644 --- a/docs/SCRATCH_INSTALL.txt +++ b/docs/SCRATCH_INSTALL.txt @@ -2736,6 +2736,9 @@ SUBPHASE 6.4: setting up asterisk and helper applications for startup - vi /etc/rc.d/rc.local - add the following entries(here's what we used): +### Path to local asterisk-perl_0.08 module if needed +PERL5LIB="/usr/share/astguiclient/libs"; export PERL5LIB + ### start time server /usr/local/bin/ntpdate -u 18.145.0.30 /usr/sbin/ntpd