r32044 - in /trunk/libapache-configfile-perl/debian/patches: 20newline.patch 30novalue.patch
gregoa at users.alioth.debian.org
gregoa at users.alioth.debian.org
Fri Mar 13 23:20:00 UTC 2009
Author: gregoa
Date: Fri Mar 13 23:19:55 2009
New Revision: 32044
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=32044
Log:
refresh other patches
Modified:
trunk/libapache-configfile-perl/debian/patches/20newline.patch
trunk/libapache-configfile-perl/debian/patches/30novalue.patch
Modified: trunk/libapache-configfile-perl/debian/patches/20newline.patch
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libapache-configfile-perl/debian/patches/20newline.patch?rev=32044&op=diff
==============================================================================
--- trunk/libapache-configfile-perl/debian/patches/20newline.patch (original)
+++ trunk/libapache-configfile-perl/debian/patches/20newline.patch Fri Mar 13 23:19:55 2009
@@ -8,7 +8,7 @@
@DPATCH@
--- a/ConfigFile.pm
+++ b/ConfigFile.pm
-@@ -223,15 +223,28 @@
+@@ -226,15 +226,28 @@
my $cmd_context = $conf;
my @parselevel = ();
my $line = 0;
@@ -40,7 +40,7 @@
# This substitutes in re-used variable on the right side of the file
# We have to handle the ignore_case flag hence the expression
-@@ -239,17 +252,17 @@
+@@ -242,17 +255,17 @@
# are visible for re-substitution
if ($self->{expand_vars}) {
local($^W) = 0 ;
@@ -61,7 +61,7 @@
# create new sublevel in parsing
my $k = $self->_fixcase($1);
push @parselevel, $cmd_context;
-@@ -272,8 +285,8 @@
+@@ -275,8 +288,8 @@
# Split up the key and the value. The @val regexp code dynamically
# differentiates between "space strings" and array, values.
Modified: trunk/libapache-configfile-perl/debian/patches/30novalue.patch
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libapache-configfile-perl/debian/patches/30novalue.patch?rev=32044&op=diff
==============================================================================
--- trunk/libapache-configfile-perl/debian/patches/30novalue.patch (original)
+++ trunk/libapache-configfile-perl/debian/patches/30novalue.patch Fri Mar 13 23:19:55 2009
@@ -8,7 +8,7 @@
@DPATCH@
--- a/ConfigFile.pm
+++ b/ConfigFile.pm
-@@ -286,6 +286,7 @@
+@@ -289,6 +289,7 @@
# Split up the key and the value. The @val regexp code dynamically
# differentiates between "space strings" and array, values.
my($key, $r) = $confline =~ m!^\s*\s*(\w+)\s*(?=\s+)(.*)!; # split up key
More information about the Pkg-perl-cvs-commits
mailing list