View | Details | Raw Unified | Return to bug 8271
Collapse All | Expand All

(-)a/C4/SIP/SIPServer.pm (+2 lines)
Lines 2-7 package SIPServer; Link Here
2
2
3
use strict;
3
use strict;
4
use warnings;
4
use warnings;
5
use FindBin qw($Bin);
6
use lib "$Bin";
5
# use Exporter;
7
# use Exporter;
6
use Sys::Syslog qw(syslog);
8
use Sys::Syslog qw(syslog);
7
use Net::Server::PreFork;
9
use Net::Server::PreFork;
(-)a/misc/bin/sip_run.sh (-4 / +6 lines)
Lines 24-30 for x in HOME PERL5LIB KOHA_CONF ; do Link Here
24
	fi;
24
	fi;
25
done;
25
done;
26
unset x;
26
unset x;
27
cd $PERL5LIB/C4/SIP;
27
# you should hard code this if you have multiple directories
28
# in your PERL5LIB
29
PERL_MODULE_DIR=$PERL5LIB
30
cd $PERL_MODULE_DIR/C4/SIP;
28
echo;
31
echo;
29
32
30
sipconfig=${1};
33
sipconfig=${1};
Lines 34-41 errfile=${3:-$HOME/sip.err}; Link Here
34
if [ $sipconfig ]; then
37
if [ $sipconfig ]; then
35
	echo "Running with config file located in $sipconfig" ;
38
	echo "Running with config file located in $sipconfig" ;
36
	echo "Calling (backgrounded):";
39
	echo "Calling (backgrounded):";
37
	echo "perl -I./ ./SIPServer.pm $sipconfig >>$outfile 2>>$errfile";
40
	echo "perl ./SIPServer.pm $sipconfig >>$outfile 2>>$errfile";
38
	perl -I./ ./SIPServer.pm $sipconfig >>$outfile 2>>$errfile &
41
	perl ./SIPServer.pm $sipconfig >>$outfile 2>>$errfile &
39
42
40
else
43
else
41
	echo "Please specify a config file and try again."
44
	echo "Please specify a config file and try again."
42
- 

Return to bug 8271