From e638d88c850333dcbc613970b792113b8588b100 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Thu, 29 Jan 2004 16:10:14 +0000 Subject: fix parsing of default values for multi argument msec functions --- perl-install/security/msec.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/perl-install/security/msec.pm b/perl-install/security/msec.pm index 3a705b89e..791ad8ef0 100644 --- a/perl-install/security/msec.pm +++ b/perl-install/security/msec.pm @@ -16,7 +16,7 @@ sub load_defaults { my ($msec, $category) = @_; my $separator = $msec->{$category}{def_separator}; map { - my ($opt, $val) = split /$separator/; + my ($opt, $val) = split(/$separator/, $_, 2); chop $val; if_($opt ne 'set_security_conf', $opt => $val); } cat_($msec->{$category}{defaults_file}), if_($category eq "checks", 'MAIL_USER'); -- cgit v1.2.1