gitea
/
Koha-clms
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

BUGFIX: set all configuration keys - die terminated the hash 

Signed-off-by: Chris Cormack <crc@liblime.com>
This commit is contained in:
MJ Ray 2007-09-06 16:00:45 +01:00 committed by Chris Cormack
parent 61190e9152
commit cecd7ef0f4
1 changed files with 5 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
rewrite-config.PL
View File

@ -59,6 +59,8 @@ also need to override WEBSERVER_IP.
$myhost = hostname();
$mydomain = $myhost;
$mydomain =~ s/^.*?\.//;
# This is set here to rescue systems with broken DNS
$myip = $ENV{'WEBSERVER_IP'} || inet_ntoa(scalar gethostbyname($myhost||'localhost')) || die "Cannot get our own IP address: DNS fault?";
# These are our configuration guesses
# Keys were extracted by
@ -72,10 +74,9 @@ $mydomain =~ s/^.*?\.//;
"__WEBMASTER_EMAIL__" => 'webmaster@'.$mydomain,
"__WEBSERVER_DOMAIN__" => $mydomain,
"__WEBSERVER_HOST__" => $myhost,
# This is set like this to rescue systems with broken DNS
"__WEBSERVER_IP__" => $ENV{'WEBSERVER_IP'} || inet_ntoa(scalar gethostbyname($myhost||'localhost')) || die "Cannot get our own IP address: DNS fault?",
"__WEBSERVER_PORT__" => 80,
"__WEBSERVER_PORT_LIBRARIAN__" => 8080,
"__WEBSERVER_IP__" => $myip,
"__WEBSERVER_PORT__" => "80",
"__WEBSERVER_PORT_LIBRARIAN__" => "8080",
"__ZEBRA_PASS__" => "zebrastripes",
"__ZEBRA_USER__" => "kohauser",
);