summaryrefslogtreecommitdiff
path: root/devel
diff options
context:
space:
mode:
authorAndrey A. Chernov <ache@FreeBSD.org>1998-09-10 00:58:33 +0000
committerAndrey A. Chernov <ache@FreeBSD.org>1998-09-10 00:58:33 +0000
commit51b2799394e72c1630b1053a065965836e50e7cb (patch)
treec1dcd3a21c0365c2984852d6f1bf1a8e0dbc9e6a /devel
parentadd missing \ to eval expr (diff)
fix reading variables with multiple '='
Notes
Notes: svn path=/head/; revision=13077
Diffstat (limited to 'devel')
-rw-r--r--devel/p5-IniConf/files/patch-aa21
1 files changed, 19 insertions, 2 deletions
diff --git a/devel/p5-IniConf/files/patch-aa b/devel/p5-IniConf/files/patch-aa
index 49f4416b9cea..40db38b51881 100644
--- a/devel/p5-IniConf/files/patch-aa
+++ b/devel/p5-IniConf/files/patch-aa
@@ -1,5 +1,5 @@
-*** IniConf.pm.bak Fri Jul 11 09:39:59 1997
---- IniConf.pm Thu Sep 10 01:15:26 1998
+*** IniConf.pm.orig Fri Jul 11 09:39:59 1997
+--- IniConf.pm Thu Sep 10 04:49:00 1998
***************
*** 203,209 ****
\$SIG{$sig} = 'IGNORE';
@@ -17,3 +17,20 @@
}
\$SIG{$sig} = '$newhandler'
}
+***************
+*** 346,352 ****
+ $self->{v}{$sect} = {};
+ }
+ }
+! elsif (($parm, $val) = /\s*(\S+)\s*=\s*(.*)/) { # new parameter
+ $parm = lc($parm) if $nocase;
+ $self->{pCMT}{$sect}{$parm} = [@cmts];
+ @cmts = ( );
+--- 346,352 ----
+ $self->{v}{$sect} = {};
+ }
+ }
+! elsif (($parm, $val) = /\s*([^\s=]+)\s*=\s*(.*)/) { # new parameter
+ $parm = lc($parm) if $nocase;
+ $self->{pCMT}{$sect}{$parm} = [@cmts];
+ @cmts = ( );