Revision 4731
Added by daigle almost 16 years ago
register-dataset.cgi | ||
---|---|---|
4101 | 4101 |
if ($debug_enabled) { |
4102 | 4102 |
# Write out the XML file for debugging purposes |
4103 | 4103 |
my $testFile = $tempDir . "/registry-eml-upload.xml"; |
4104 |
open (TFILE,">$testFile") || die ("Cant open xml file...\n"); |
|
4105 |
print TFILE $doc; |
|
4106 |
close(TFILE); |
|
4104 |
|
|
4105 |
if (open (TFILE,">$testFile")) { |
|
4106 |
print TFILE $doc; |
|
4107 |
close(TFILE); |
|
4108 |
} else { |
|
4109 |
debug("WARNING: Cant open xml file: $testFile"); |
|
4110 |
} |
|
4107 | 4111 |
} |
4108 | 4112 |
} |
4109 | 4113 |
|
Also available in: Unified diff
Don't die if the xml-debug file can't be written to the temporary directory. Instead, write a warning. Include the directions for making the temporary dir writable to the apache user in documentation.