diff options
author | allen <allen@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 2001-01-08 23:40:27 +0000 |
---|---|---|
committer | allen <allen@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 2001-01-08 23:40:27 +0000 |
commit | 12bb7ec97afb52b48c35ce9b37b003090d1f14d6 (patch) | |
tree | 21fdda02bbaffd11eeb52af1453c0e82b9ed3fe1 /lib/make/setup_configuration.pl | |
parent | 88a63aa2df649d06c1be24981d786dd548c98f2f (diff) |
Fix for allowing absolute paths for options files
Cactus/504
git-svn-id: http://svn.cactuscode.org/flesh/trunk@1985 17b73243-c579-4c4c-a9d2-2d5706c11dac
Diffstat (limited to 'lib/make/setup_configuration.pl')
-rwxr-xr-x | lib/make/setup_configuration.pl | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/lib/make/setup_configuration.pl b/lib/make/setup_configuration.pl index e0b8999b..53df3eaf 100755 --- a/lib/make/setup_configuration.pl +++ b/lib/make/setup_configuration.pl @@ -133,7 +133,11 @@ sub SetConfigureEnv # The user has specified a configuration file print "Using configuration options from $config_file...\n"; - open(INFILE, "<$top/$config_file") || die "Cannot open configuration file $config_file"; + if($config_file !~ m:^/:) + { + $config_file = "$top/$config_file"; + } + open(INFILE, "<$config_file") || die "Cannot open configuration file $config_file"; while(<INFILE>) { |