Slurp the entire multi-config.pl file and eval it as a whole to allow

multi-line variable entries.


git-svn-id: svn://10.0.0.236/trunk@174443 18797224-902f-48f8-a5cc-f745e15eee43
This commit is contained in:
cltbld
2005-06-10 22:55:31 +00:00
parent 43d8892f19
commit b5b66391a5

View File

@@ -36,12 +36,13 @@ sub LoadConfig() {
open CONFIG, 'multi-config.pl' or
print "can't open multi-config.pl, $?\n";
while (<CONFIG>) {
package Settings;
eval;
}
local $/ = undef;
my $config = <CONFIG>;
close CONFIG;
package Settings;
eval $config;
} else {
warn "Error: Need tinderbox config file, multi-config.pl\n";
exit;