Changeset 304858fd9795d803984005eb49e4f64a65d7a803
- Timestamp:
- 03/24/09 17:41:15
(4 years ago)
- Author:
- Mark Harrison <mark@omniti.com>
- git-committer:
- Mark Harrison <mark@omniti.com> 1237916475 +0000
- git-parent:
[b603f6fffe936f58cee3b10e0bbdd96b443bcacf]
- git-author:
- Mark Harrison <mark@omniti.com> 1237916475 +0000
- Message:
Fix another config parsing bug where option values less than 3 characters long were not counted
git-svn-id: https://labs.omniti.com/resmon/trunk@168 8c0face9-b7db-6ec6-c4b3-d5f7145c7d55
-
Files:
-
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
| rb603f6f |
r304858f |
|
| 26 | 26 | $kvs{'object'} = $1; |
|---|
| 27 | 27 | my @params = split(/,/, $2); |
|---|
| 28 | | grep { $kvs{$1} = $2 if /^\s*(\S+)\s*=>\s*(\S.+\S)\s*$/ } @params; |
|---|
| | 28 | grep { $kvs{$1} = $2 if /^\s*(\S+)\s*=>\s*(\S(?:.*\S))\s*$/ } @params; |
|---|
| 29 | 29 | my $object = bless \%kvs, "Resmon::Module::$current"; |
|---|
| 30 | 30 | push(@{$self->{Module}->{$current}}, $object); |
|---|