diff options
| author | Oliver Tappe | 2007-07-22 11:29:49 +0200 |
|---|---|---|
| committer | Oliver Tappe | 2007-07-22 11:29:49 +0200 |
| commit | 1258e167d0c75473e50e840063db6d92eeaf0a80 (patch) | |
| tree | a5e2bf67384e19d6e75a4f057f85161ae8aa385c /bin | |
| parent | * first part of configuration file migration to Config::General (diff) | |
| download | core-1258e167d0c75473e50e840063db6d92eeaf0a80.tar.gz core-1258e167d0c75473e50e840063db6d92eeaf0a80.tar.xz core-1258e167d0c75473e50e840063db6d92eeaf0a80.zip | |
* fixed compatibility problems of our config-files with regards to being
executed by shells: there is no whitespace allowed before or after the
equal sign in shell-var assignments
git-svn-id: http://svn.openslx.org/svn/openslx/trunk@1269 95ad53e4-c205-0410-b2fa-d234c58c8868
Diffstat (limited to 'bin')
| -rwxr-xr-x | bin/slxsettings | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/bin/slxsettings b/bin/slxsettings index be318bb5..976640ee 100755 --- a/bin/slxsettings +++ b/bin/slxsettings @@ -90,7 +90,10 @@ while (scalar @ARGV) { # fetch current content of local settings file... my $fileName = "$openslxConfig{'config-path'}/settings"; my $configObj = Config::General->new( - -ConfigFile => $fileName, -SplitPolicy => 'equalsign', + -ConfigFile => $fileName, + -SplitDelimiter => '\s*=\s*', + -SplitPolicy => 'custom', + -StoreDelimiter => '=', ); my %settings = $configObj->getall(); |