Commit d9dae9e2 authored by Leigh Stoller's avatar Leigh Stoller

Minor debugging.

parent 328b61d8
......@@ -475,7 +475,9 @@ my $slice_hrn = "${PGENIDOMAIN}.${slice_id}";
print STDERR "\n";
print STDERR "$user_urn\n";
print STDERR "$slice_urn\n\n\n";
print STDERR "$slice_urn\n";
print STDERR $ENV{"SERVER_NAME"} . "\n" if (exists($ENV{"SERVER_NAME"}));
print STDERR "\n";
print STDERR "$rspecstr\n";
#
......
......@@ -159,6 +159,9 @@ class Instance
if (isset($_SERVER['REMOTE_ADDR'])) {
putenv("REMOTE_ADDR=" . $_SERVER['REMOTE_ADDR']);
}
if (isset($_SERVER['SERVER_NAME'])) {
putenv("SERVER_NAME=" . $_SERVER['SERVER_NAME']);
}
$retval = SUEXEC($uid, $pid,
"webquickvm $options -u $uuid $xmlname",
SUEXEC_ACTION_CONTINUE);
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment