diff options
| author | fukachan <fukachan> | 2002-02-17 13:31:29 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2002-02-17 13:31:29 +0000 |
| commit | c00c213953a11aacd1562631869d887bcc48dd71 (patch) | |
| tree | f870fda5e151c746c981ff06023aad92486b5cd4 | |
| parent | 78fc8d9fed1698b5672d1b48540706b15147f93d (diff) | |
| download | fml8-c00c213953a11aacd1562631869d887bcc48dd71.tar.gz fml8-c00c213953a11aacd1562631869d887bcc48dd71.tar.bz2 fml8-c00c213953a11aacd1562631869d887bcc48dd71.zip | |
fix return value by FETCH() to be without \s*$
| -rw-r--r-- | fml/lib/FML/Config.pm | 11 |
1 files changed, 9 insertions, 2 deletions
diff --git a/fml/lib/FML/Config.pm b/fml/lib/FML/Config.pm index e9daad44..b13fa5be 100644 --- a/fml/lib/FML/Config.pm +++ b/fml/lib/FML/Config.pm @@ -1,7 +1,7 @@ #-*- perl -*- # Copyright (C) 2000,2001,2002 Ken'ichi Fukamachi # -# $FML: Config.pm,v 1.53 2002/02/17 03:13:47 fukachan Exp $ +# $FML: Config.pm,v 1.54 2002/02/17 09:31:10 fukachan Exp $ # package FML::Config; @@ -807,7 +807,14 @@ sub FETCH $need_expansion_variables = 0; } - defined($_fml_config_result{$key}) ? $_fml_config_result{$key} : undef; + if (defined($_fml_config_result{$key})) { + my $x = $_fml_config_result{$key}; + $x =~ s/\s*$//; + $x; + } + else { + undef; + } } |