r22548 - in /trunk: libapache-configfile-perl/debian/patches/ libcgi-xml-perl/debian/patches/ libcrypt-openssl-random-perl/debian/patches/ libdata-stag-perl/debian/patches/ libdbd-xbase-perl/debian/patches/ libdbi-perl/debian/patches/ libdigest-md4-perl/debian/patches/ libfilesys-smbclient-perl/debian/patches/ libhtml-clean-perl/debian/patches/ libhtml-wikiconverter-perl/debian/patches/ liblinux-lvm-perl/debian/patches/ libmail-cclient-perl/debian/patches/ libmail-gnupg-perl/debian/patches/ libnet-patricia-perl/debian/patches/ libopengl-perl/debian/patches/ libterm-readline-gnu-perl/debian/patches/ libtest-manifest-perl/debian/patches/ libtest-mockobject-perl/debian/patches/ libtest-warn-perl/debian/patches/ libunicode-map8-perl-dfsg/debian/patches/ libvorbis-perl/debian/patches/ libxml-dom-perl/debian/patches/ libxml-mini-perl/debian/patches/ libxml-sax-machines-perl/debian/patches/ libxml-sax-perl/debian/patches/ libxml-xpath-perl/debian/patches/

dmn at users.alioth.debian.org dmn at users.alioth.debian.org
Mon Jun 30 18:44:32 UTC 2008


Author: dmn
Date: Mon Jun 30 18:44:32 2008
New Revision: 22548

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=22548
Log:
refresh all patches once more with --strip-trailing-whitespace

Modified:
    trunk/libapache-configfile-perl/debian/patches/20newline.patch
    trunk/libcgi-xml-perl/debian/patches/fix_module_name.patch
    trunk/libcrypt-openssl-random-perl/debian/patches/Makefile.PL-no-ssl-in-LIBS.patch
    trunk/libdata-stag-perl/debian/patches/missing-manpages.patch
    trunk/libdbd-xbase-perl/debian/patches/Makefile.PL.patch
    trunk/libdbi-perl/debian/patches/t__06attrs.t__localefix.patch
    trunk/libdigest-md4-perl/debian/patches/test-rfc.patch
    trunk/libfilesys-smbclient-perl/debian/patches/10_Makefile.PL.patch
    trunk/libhtml-clean-perl/debian/patches/clean-and-pre_282503.patch
    trunk/libhtml-wikiconverter-perl/debian/patches/1012-Allow-and-use-rules-for-text-nodes-as-an-alternative-to-escaping-in-preprocessing.patch
    trunk/liblinux-lvm-perl/debian/patches/process_whitespace_in_command_output
    trunk/libmail-cclient-perl/debian/patches/1001_fix_segfault_from_truncated_pointer.patch
    trunk/libmail-gnupg-perl/debian/patches/02_doc-meme-sigs-verification.patch
    trunk/libnet-patricia-perl/debian/patches/Makefile.PL.patch
    trunk/libopengl-perl/debian/patches/examples-perl-path
    trunk/libterm-readline-gnu-perl/debian/patches/30outstream.patch
    trunk/libtest-manifest-perl/debian/patches/01-fix_manpage_section.patch
    trunk/libtest-mockobject-perl/debian/patches/pod-fixes-MockObject.pm.diff
    trunk/libtest-warn-perl/debian/patches/language.patch
    trunk/libunicode-map8-perl-dfsg/debian/patches/aliases.patch
    trunk/libvorbis-perl/debian/patches/bts389571_give-ov_open-duplicate-handle.patch
    trunk/libxml-dom-perl/debian/patches/output_encoding.patch
    trunk/libxml-mini-perl/debian/patches/header-attributes-sorting.diff
    trunk/libxml-sax-machines-perl/debian/patches/pseudo-hash.patch
    trunk/libxml-sax-machines-perl/debian/patches/vendorlibs.patch
    trunk/libxml-sax-perl/debian/patches/charset-decoding
    trunk/libxml-sax-perl/debian/patches/parserdetails-debian
    trunk/libxml-xpath-perl/debian/patches/test.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=22548&op=diff
==============================================================================
--- trunk/libapache-configfile-perl/debian/patches/20newline.patch (original)
+++ trunk/libapache-configfile-perl/debian/patches/20newline.patch Mon Jun 30 18:44:32 2008
@@ -23,7 +23,7 @@
 +	    # This line is a continuation
 +	    $confline = "$cont_confline $confline";
 +	    $cont_confline = '';
-+	} 
++	}
 +	if ($confline =~ /^(.+)\\\s*$/) {
 +	    # This line continues in the next one
 +	    $cont_confline = $1;

Modified: trunk/libcgi-xml-perl/debian/patches/fix_module_name.patch
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libcgi-xml-perl/debian/patches/fix_module_name.patch?rev=22548&op=diff
==============================================================================
--- trunk/libcgi-xml-perl/debian/patches/fix_module_name.patch (original)
+++ trunk/libcgi-xml-perl/debian/patches/fix_module_name.patch Mon Jun 30 18:44:32 2008
@@ -51,7 +51,7 @@
  to XML and vice versa.
  
 -B<XML::CGI> is a subclass of B<CGI.pm>, so it reads the CGI 
-+B<CGI::XML> is a subclass of B<CGI.pm>, so it reads the CGI 
++B<CGI::XML> is a subclass of B<CGI.pm>, so it reads the CGI
  variables just as CGI.pm would.
  
  =head1 METHODS

Modified: trunk/libcrypt-openssl-random-perl/debian/patches/Makefile.PL-no-ssl-in-LIBS.patch
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libcrypt-openssl-random-perl/debian/patches/Makefile.PL-no-ssl-in-LIBS.patch?rev=22548&op=diff
==============================================================================
--- trunk/libcrypt-openssl-random-perl/debian/patches/Makefile.PL-no-ssl-in-LIBS.patch (original)
+++ trunk/libcrypt-openssl-random-perl/debian/patches/Makefile.PL-no-ssl-in-LIBS.patch Mon Jun 30 18:44:32 2008
@@ -5,7 +5,7 @@
      'VERSION_FROM'	=> 'Random.pm', # finds $VERSION
      'PREREQ_PM'		=> {}, # e.g., Module::Name => 1.1
 -    'LIBS'	        => ['-lssl -lcrypto'],   # e.g., '-lm' 
-+    'LIBS'	        => ['-lcrypto'],   # e.g., '-lm' 
++    'LIBS'	        => ['-lcrypto'],   # e.g., '-lm'
      'DEFINE'		=> '', # e.g., '-DHAVE_SOMETHING'
      'INC'		=> '', # e.g., '-I/usr/include/other'
  );

Modified: trunk/libdata-stag-perl/debian/patches/missing-manpages.patch
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdata-stag-perl/debian/patches/missing-manpages.patch?rev=22548&op=diff
==============================================================================
--- trunk/libdata-stag-perl/debian/patches/missing-manpages.patch (original)
+++ trunk/libdata-stag-perl/debian/patches/missing-manpages.patch Mon Jun 30 18:44:32 2008
@@ -11,7 +11,7 @@
  
 +__END__
 +
-+=head1 NAME 
++=head1 NAME
 +
 +stag-itext2simple - converts between stag formats
 +
@@ -32,7 +32,7 @@
  
 +__END__
  
-+=head1 NAME 
++=head1 NAME
 +
 +stag-itext2sxpr - converts between stag formats
 +
@@ -54,7 +54,7 @@
 +
 +__END__
 +
-+=head1 NAME 
++=head1 NAME
 +
 +stag-itext2xml - converts between stag formats
 +
@@ -75,7 +75,7 @@
  }
 +__END__
 +
-+=head1 NAME 
++=head1 NAME
 +
 +stag-xml2itext - converts between stag formats
 +

Modified: trunk/libdbd-xbase-perl/debian/patches/Makefile.PL.patch
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdbd-xbase-perl/debian/patches/Makefile.PL.patch?rev=22548&op=diff
==============================================================================
--- trunk/libdbd-xbase-perl/debian/patches/Makefile.PL.patch (original)
+++ trunk/libdbd-xbase-perl/debian/patches/Makefile.PL.patch Mon Jun 30 18:44:32 2008
@@ -5,6 +5,6 @@
          'dist'		=> { COMPRESS => 'gzip -9f', SUFFIX => 'gz',
  		POSTOP => 'mv $(DISTNAME)-$(VERSION).tar.gz ../' },
 -	'clean'		=> { FILES => 'bin/dbfdump bin/indexdump t/newtable.dbf t/newtable.dbt t/write.dbf t/write.dbt t/rooms1.dbf t/rooms1.cdx '},	
-+	'clean'		=> { FILES => 'bin/dbfdump bin/indexdump t/newtable.dbf t/newtable.dbt t/write.dbf t/write.dbt t/rooms1.dbf t/rooms1.cdx t/rooms.sdbm1.dir t/rooms.sdbm1.pag t/rooms.sdbmd.dir t/rooms.sdbmd.pag t/tstidx.dbf t/tstidxid.idx t/tstidxname.idx t/write1.dbf t/write1.FPT'},	
++	'clean'		=> { FILES => 'bin/dbfdump bin/indexdump t/newtable.dbf t/newtable.dbt t/write.dbf t/write.dbt t/rooms1.dbf t/rooms1.cdx t/rooms.sdbm1.dir t/rooms.sdbm1.pag t/rooms.sdbmd.dir t/rooms.sdbmd.pag t/tstidx.dbf t/tstidxid.idx t/tstidxname.idx t/write1.dbf t/write1.FPT'},
  	);
  

Modified: trunk/libdbi-perl/debian/patches/t__06attrs.t__localefix.patch
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdbi-perl/debian/patches/t__06attrs.t__localefix.patch?rev=22548&op=diff
==============================================================================
--- trunk/libdbi-perl/debian/patches/t__06attrs.t__localefix.patch (original)
+++ trunk/libdbi-perl/debian/patches/t__06attrs.t__localefix.patch Mon Jun 30 18:44:32 2008
@@ -8,13 +8,13 @@
  
  ## ----------------------------------------------------------------------------
  ## 06attrs.t - ...
-@@ -16,6 +17,9 @@ BEGIN { 
- }
+@@ -17,6 +18,9 @@ BEGIN { 
  
  $|=1;
-+ 
+ 
 +# For the error messages in the statement handle tests.
 +setlocale(LC_ALL, "C");
- 
++
  my $using_autoproxy = ($ENV{DBI_AUTOPROXY});
  my $dsn = 'dbi:ExampleP:dummy';
+ 

Modified: trunk/libdigest-md4-perl/debian/patches/test-rfc.patch
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdigest-md4-perl/debian/patches/test-rfc.patch?rev=22548&op=diff
==============================================================================
--- trunk/libdigest-md4-perl/debian/patches/test-rfc.patch (original)
+++ trunk/libdigest-md4-perl/debian/patches/test-rfc.patch Mon Jun 30 18:44:32 2008
@@ -3,7 +3,7 @@
 
 --- a/t/files.t
 +++ b/t/files.t
-@@ -5,7 +5,7 @@
+@@ -5,7 +5,7 @@ BEGIN {
          }
  }
  
@@ -12,7 +12,7 @@
  
  use strict;
  use Digest::MD4 qw(md4 md4_hex md4_base64);
-@@ -24,7 +24,6 @@
+@@ -24,7 +24,6 @@ if (ord "A" == 193) { # EBCDIC
  0dbd12438619d37abe39c41e4584ebe0  README
  86dc1e88bf2f4c41bc4d365686604342  MD4.pm
  07995cc4bb36cba6306fded60ca69805  MD4.xs
@@ -20,7 +20,7 @@
  EOT
  } elsif ("\n" eq "\015") { # MacOS
      $EXPECT = <<EOT;
-@@ -32,16 +31,14 @@
+@@ -32,16 +31,14 @@ ed06361c6e9000bef1df740bcbad8622  Change
  a64a8e41ca2fe973ffbb46aa66d70bd2  README
  bfdcb4108a0aec528b1ac9c8407f3b3a  MD4.pm
  9db8b845da6b42d7f3cbaf690504dfb4  MD4.xs

Modified: trunk/libfilesys-smbclient-perl/debian/patches/10_Makefile.PL.patch
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libfilesys-smbclient-perl/debian/patches/10_Makefile.PL.patch?rev=22548&op=diff
==============================================================================
--- trunk/libfilesys-smbclient-perl/debian/patches/10_Makefile.PL.patch (original)
+++ trunk/libfilesys-smbclient-perl/debian/patches/10_Makefile.PL.patch Mon Jun 30 18:44:32 2008
@@ -26,7 +26,7 @@
 -  prompt("Do you want make tests ?(you will be prompted for server / \n".
 -	   "worgroup / share / user / password to make read write access.",
 -	   "yes");
-+#my $ans = 
++#my $ans =
 +#  prompt("Do you want make tests ?(you will be prompted for server / \n".
 +#	   "worgroup / share / user / password to make read write access.",
 +#	   "yes");

Modified: trunk/libhtml-clean-perl/debian/patches/clean-and-pre_282503.patch
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libhtml-clean-perl/debian/patches/clean-and-pre_282503.patch?rev=22548&op=diff
==============================================================================
--- trunk/libhtml-clean-perl/debian/patches/clean-and-pre_282503.patch (original)
+++ trunk/libhtml-clean-perl/debian/patches/clean-and-pre_282503.patch Mon Jun 30 18:44:32 2008
@@ -6,9 +6,9 @@
  
 +Please note that if your HTML includes preformatted regions (this means, if
 +it includes <pre>...</pre>, we do not suggest removing whitespace, as it will
-+alter the rendered defaults. 
++alter the rendered defaults.
 +
-+HTML::Clean will print out a warning if it finds a preformatted region and is 
++HTML::Clean will print out a warning if it finds a preformatted region and is
 +requested to strip whitespace. In order to prevent this, specify that you don't
 +want to strip whitespace - i.e.
 +

Modified: trunk/libhtml-wikiconverter-perl/debian/patches/1012-Allow-and-use-rules-for-text-nodes-as-an-alternative-to-escaping-in-preprocessing.patch
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libhtml-wikiconverter-perl/debian/patches/1012-Allow-and-use-rules-for-text-nodes-as-an-alternative-to-escaping-in-preprocessing.patch?rev=22548&op=diff
==============================================================================
--- trunk/libhtml-wikiconverter-perl/debian/patches/1012-Allow-and-use-rules-for-text-nodes-as-an-alternative-to-escaping-in-preprocessing.patch (original)
+++ trunk/libhtml-wikiconverter-perl/debian/patches/1012-Allow-and-use-rules-for-text-nodes-as-an-alternative-to-escaping-in-preprocessing.patch Mon Jun 30 18:44:32 2008
@@ -16,12 +16,9 @@
      return $self->__subst($rules->{replace}, $node, $rules) if exists $rules->{replace};
  
      # Set private preserve rules
-@@ -322,9 +317,14 @@ sub __wikify {
+@@ -324,7 +319,12 @@ sub __wikify {
+     $output = "\n$output" if $rules->{block} and $node->parent->look_up( _tag => $node->tag ) and $trim ne 'none';
  
-     # ...but they are put on their own line
-     $output = "\n$output" if $rules->{block} and $node->parent->look_up( _tag => $node->tag ) and $trim ne 'none';
--
-+    
      return $output;
 +    } elsif ( $node->tag eq '~text' ) {
 +      return $node->attr('text');

Modified: trunk/liblinux-lvm-perl/debian/patches/process_whitespace_in_command_output
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/liblinux-lvm-perl/debian/patches/process_whitespace_in_command_output?rev=22548&op=diff
==============================================================================
--- trunk/liblinux-lvm-perl/debian/patches/process_whitespace_in_command_output (original)
+++ trunk/liblinux-lvm-perl/debian/patches/process_whitespace_in_command_output Mon Jun 30 18:44:32 2008
@@ -5,25 +5,25 @@
  
          # Parse the volume group name.
 -        if( m/^VG Name\s+(\S+)/ ) { 
-+        if( m/^\s*VG Name\s+(\S+)/ ) { 
++        if( m/^\s*VG Name\s+(\S+)/ ) {
              $vgn = $1; $vghash{$vgn}->{vgname} = $1; 
              next VGINF; }
  
          # Parse the volume group access.
 -        elsif( m/^VG Access\s+(\S+)/ ) { 
-+        elsif( m/^\s*VG Access\s+(\S+)/ ) { 
++        elsif( m/^\s*VG Access\s+(\S+)/ ) {
              $vghash{$vgn}->{access} = $1; 
              next VGINF; }
  
          # Parse the volume group status.
 -        elsif( m/^VG Status\s+(.+)/ ) { 
-+        elsif( m/^\s*VG Status\s+(.+)/ ) { 
++        elsif( m/^\s*VG Status\s+(.+)/ ) {
              $vghash{$vgn}->{status} = $1; 
              next VGINF; }
  
          # Parse the volume group number.
 -        elsif( m/^VG #\s+(\S+)/ ) { 
-+        elsif( m/^\s*VG #\s+(\S+)/ ) { 
++        elsif( m/^\s*VG #\s+(\S+)/ ) {
              $vghash{$vgn}->{vg_number} = $1; 
              next VGINF; }
  
@@ -36,37 +36,37 @@
  
          # Parse the maximum number of logical volumes for the volume group.
 -        elsif( m/^MAX LV\s+(\S+)/ ) { 
-+        elsif( m/^\s*MAX LV\s+(\S+)/ ) { 
++        elsif( m/^\s*MAX LV\s+(\S+)/ ) {
              $vghash{$vgn}->{max_lv} = $1; 
              next VGINF; }
  
          # Parse the current number of logical volumes for the volume group.
 -        elsif( m/^Cur LV\s+(\S+)/ ) { 
-+        elsif( m/^\s*Cur LV\s+(\S+)/ ) { 
++        elsif( m/^\s*Cur LV\s+(\S+)/ ) {
              $vghash{$vgn}->{cur_lv} = $1; 
              next VGINF; }
  
          # Parse the number of open logical volumes for the volume group.
 -        elsif( m/^Open LV\s+(\S+)/ )   { 
-+        elsif( m/^\s*Open LV\s+(\S+)/ )   { 
++        elsif( m/^\s*Open LV\s+(\S+)/ )   {
              $vghash{$vgn}->{open_lv} = $1; 
              next VGINF; }
  
          # Parse the number of physical volumes accessible to the volume group.
 -        elsif( m/^Max PV\s+(\S+)/ ) { 
-+        elsif( m/^\s*Max PV\s+(\S+)/ ) { 
++        elsif( m/^\s*Max PV\s+(\S+)/ ) {
              $vghash{$vgn}->{max_pv} = $1; 
              next VGINF; }
  
          # Parse the current number of physical volumes in the volume group.
 -        elsif( m/^Cur PV\s+(\S+)/ ) { 
-+        elsif( m/^\s*Cur PV\s+(\S+)/ ) { 
++        elsif( m/^\s*Cur PV\s+(\S+)/ ) {
              $vghash{$vgn}->{cur_pv} = $1; 
              next VGINF; }
  
          # Parse the number of active physical volumes in the volume group.
 -        elsif( m/^Act PV\s+(\S+)/ ) { 
-+        elsif( m/^\s*Act PV\s+(\S+)/ ) { 
++        elsif( m/^\s*Act PV\s+(\S+)/ ) {
              $vghash{$vgn}->{act_pv} = $1; 
              next VGINF; }
  
@@ -93,7 +93,7 @@
  
          # Parse the total number of physical extents from the volume group.
 -        elsif( m/^Total PE\s+(\S+)/ ) { 
-+        elsif( m/^\s*Total PE\s+(\S+)/ ) { 
++        elsif( m/^\s*Total PE\s+(\S+)/ ) {
              $vghash{$vgn}->{total_pe} = $1; 
              next VGINF; }
  
@@ -115,13 +115,13 @@
  
          # Parse the volume group uuid.
 -        elsif( m/^VG UUID\s+(\S+)/ ) { 
-+        elsif( m/^\s*VG UUID\s+(\S+)/ ) { 
++        elsif( m/^\s*VG UUID\s+(\S+)/ ) {
              $vghash{$vgn}->{uuid} = $1; 
              next VGINF; }
  
          # Parse the logical volume name.
 -        elsif( m/^LV Name\s+(\S+)/ ) { 
-+        elsif( m/^\s*LV Name\s+(\S+)/ ) { 
++        elsif( m/^\s*LV Name\s+(\S+)/ ) {
              $lvn = $1; 
              $vghash{$vgn}->{lvols}->{$lvn}->{name} = $1; 
              next VGINF; }
@@ -135,55 +135,55 @@
  
          # Parse the logical volume write access.
 -        elsif( m/^LV Write Access\s+(\S+)/ ) { 
-+        elsif( m/^\s*LV Write Access\s+(\S+)/ ) { 
++        elsif( m/^\s*LV Write Access\s+(\S+)/ ) {
              $vghash{$vgn}->{lvols}->{$lvn}->{write_access} = $1; 
              next VGINF; }
  
          # Parse the logical volume status.
 -        elsif( m/^LV Status\s+(.+)/ ) { 
-+        elsif( m/^\s*LV Status\s+(.+)/ ) { 
++        elsif( m/^\s*LV Status\s+(.+)/ ) {
              $vghash{$vgn}->{lvols}->{$lvn}->{status} = $1; 
              next VGINF; }
  
          # Parse the number of logical extents in the logical volume.
 -        elsif( m/^Current LE\s+(\S+)/ ) { 
-+        elsif( m/^\s*Current LE\s+(\S+)/ ) { 
++        elsif( m/^\s*Current LE\s+(\S+)/ ) {
              $vghash{$vgn}->{lvols}->{$lvn}->{cur_le} = $1; 
              next VGINF; }
  
          # Parse the number of allocated logical extents in the logical volume.
 -        elsif( m/^Allocated LE\s+(\S+)/ ) { 
-+        elsif( m/^\s*Allocated LE\s+(\S+)/ ) { 
++        elsif( m/^\s*Allocated LE\s+(\S+)/ ) {
              $vghash{$vgn}->{lvols}->{$lvn}->{alloc_le} = $1; 
              next VGINF; }
  
          # Parse the allocation type for the logical volume.
 -        elsif( m/^Allocation\s+(.+)/ ) { 
-+        elsif( m/^\s*Allocation\s+(.+)/ ) { 
++        elsif( m/^\s*Allocation\s+(.+)/ ) {
              $vghash{$vgn}->{lvols}->{$lvn}->{allocation} = $1; 
              next VGINF; }
  
          # Parse the volume number.
 -        elsif( m/^LV #\s+(\S+)/ ) { 
-+        elsif( m/^\s*LV #\s+(\S+)/ ) { 
++        elsif( m/^\s*LV #\s+(\S+)/ ) {
              $vghash{$vgn}->{lvols}->{$lvn}->{lv_number} = $1; 
              next VGINF; }
  
          # Parse the number of times the logical volume is open.
 -        elsif( m/^# open\s+(\S+)/ ) { 
-+        elsif( m/^\s*# open\s+(\S+)/ ) { 
++        elsif( m/^\s*# open\s+(\S+)/ ) {
              $vghash{$vgn}->{lvols}->{$lvn}->{open_lv} = $1; 
              next VGINF; }
  
          # Parse the block device of the logical volume.
 -        elsif( m/^Block device\s+(\S+)/ ) { 
-+        elsif( m/^\s*Block device\s+(\S+)/ ) { 
++        elsif( m/^\s*Block device\s+(\S+)/ ) {
              $vghash{$vgn}->{lvols}->{$lvn}->{device} = $1; 
              next VGINF; }
  
          # Parse the value for the read ahead sectors of the logical volume.
 -        elsif( m/^Read ahead sectors\s+(\S+)/ ) { 
-+        elsif( m/^\s*Read ahead sectors\s+(\S+)/ ) { 
++        elsif( m/^\s*Read ahead sectors\s+(\S+)/ ) {
              $vghash{$vgn}->{lvols}->{$lvn}->{read_ahead} = $1; 
              next VGINF; }
  
@@ -197,7 +197,7 @@
  
          # Parse the status of the physical disk.
 -        elsif( m/^PV Status\s+(.+)/ ) { 
-+        elsif( m/^\s*PV Status\s+(.+)/ ) { 
++        elsif( m/^\s*PV Status\s+(.+)/ ) {
              $vghash{$vgn}->{pvols}->{$pvn}->{status} = $1; 
              next VGINF; }
      }

Modified: trunk/libmail-cclient-perl/debian/patches/1001_fix_segfault_from_truncated_pointer.patch
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libmail-cclient-perl/debian/patches/1001_fix_segfault_from_truncated_pointer.patch?rev=22548&op=diff
==============================================================================
--- trunk/libmail-cclient-perl/debian/patches/1001_fix_segfault_from_truncated_pointer.patch (original)
+++ trunk/libmail-cclient-perl/debian/patches/1001_fix_segfault_from_truncated_pointer.patch Mon Jun 30 18:44:32 2008
@@ -1,7 +1,7 @@
 # Fix segfault on some architectures due to fs_get implicit conversion
 # More info: http://bugs.debian.org/308541
---- libmail-cclient-perl-1.12.orig/criteria.c
-+++ libmail-cclient-perl-1.12/criteria.c
+--- a/criteria.c
++++ b/criteria.c
 @@ -13,6 +13,7 @@
  #include <stdio.h>
  #include <stddef.h>

Modified: trunk/libmail-gnupg-perl/debian/patches/02_doc-meme-sigs-verification.patch
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libmail-gnupg-perl/debian/patches/02_doc-meme-sigs-verification.patch?rev=22548&op=diff
==============================================================================
--- trunk/libmail-gnupg-perl/debian/patches/02_doc-meme-sigs-verification.patch (original)
+++ trunk/libmail-gnupg-perl/debian/patches/02_doc-meme-sigs-verification.patch Mon Jun 30 18:44:32 2008
@@ -5,7 +5,7 @@
    format, or just a single part ascii armored message.
  
 +  Note that MIME-encoded data should be supplied unmodified inside
-+  the MIME::Entity input message, otherwise the signature will be 
++  the MIME::Entity input message, otherwise the signature will be
 +  broken. Since MIME-tools version 5.419, this can be achieved with
 +  the C<decode_bodies> method of MIME::Parser. See the MIME::Parser
 +  documentation for more information.

Modified: trunk/libnet-patricia-perl/debian/patches/Makefile.PL.patch
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libnet-patricia-perl/debian/patches/Makefile.PL.patch?rev=22548&op=diff
==============================================================================
--- trunk/libnet-patricia-perl/debian/patches/Makefile.PL.patch (original)
+++ trunk/libnet-patricia-perl/debian/patches/Makefile.PL.patch Mon Jun 30 18:44:32 2008
@@ -5,7 +5,7 @@
      'NAME'	=> 'Net::Patricia',
      'VERSION_FROM' => 'Patricia.pm', # finds $VERSION
 -    'LIBS'	=> ['-lnsl'],   # e.g., '-lm' 
-+    'LIBS'	=> [''],   # e.g., '-lm' 
++    'LIBS'	=> [''],   # e.g., '-lm'
      'DEFINE'	=> '',     # e.g., '-DHAVE_SOMETHING' 
      'INC'	=> '',     # e.g., '-I/usr/include/other' 
      'MYEXTLIB'	=> 'libpatricia/libpatricia$(LIB_EXT)',     # e.g., '-I/usr/include/other' 

Modified: trunk/libopengl-perl/debian/patches/examples-perl-path
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libopengl-perl/debian/patches/examples-perl-path?rev=22548&op=diff
==============================================================================
--- trunk/libopengl-perl/debian/patches/examples-perl-path (original)
+++ trunk/libopengl-perl/debian/patches/examples-perl-path Mon Jun 30 18:44:32 2008
@@ -34,7 +34,7 @@
 +++ b/examples/fun
 @@ -1,4 +1,4 @@
 -#!/usr/local/bin/perl 
-+#!/usr/bin/perl 
++#!/usr/bin/perl
  #
  #       object oriented programming example
  #
@@ -66,7 +66,7 @@
 +++ b/examples/quest
 @@ -1,4 +1,4 @@
 -#!/usr/local/bin/perl 
-+#!/usr/bin/perl 
++#!/usr/bin/perl
  
  # simple maze thingy
  
@@ -106,7 +106,7 @@
 +++ b/examples/tk_demo
 @@ -1,4 +1,4 @@
 -#!/usr/local/bin/perl 
-+#!/usr/bin/perl 
++#!/usr/bin/perl
  #
  # This is an example of combining the tk module and opengl
  # You have to have TK installed for this to work.
@@ -114,7 +114,7 @@
 +++ b/examples/tk_steal
 @@ -1,4 +1,4 @@
 -#!/usr/local/bin/perl 
-+#!/usr/bin/perl 
++#!/usr/bin/perl
  #
  # This is an example of combining the tk module and opengl
  # You have to have TK installed for this to work.

Modified: trunk/libterm-readline-gnu-perl/debian/patches/30outstream.patch
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libterm-readline-gnu-perl/debian/patches/30outstream.patch?rev=22548&op=diff
==============================================================================
--- trunk/libterm-readline-gnu-perl/debian/patches/30outstream.patch (original)
+++ trunk/libterm-readline-gnu-perl/debian/patches/30outstream.patch Mon Jun 30 18:44:32 2008
@@ -19,7 +19,7 @@
  	      PerlIO_releaseFILE(outstreamPIO, rl_outstream);
  #endif
  	    rl_outstream = PerlIO_findFILE(stream);
-+	    /* 
++	    /*
 +	     * Debian-specific addition fixing a segfault with "PERLIO=stdio"
 +	     * see http://bugs.debian.org/350991
 +	     */

Modified: trunk/libtest-manifest-perl/debian/patches/01-fix_manpage_section.patch
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libtest-manifest-perl/debian/patches/01-fix_manpage_section.patch?rev=22548&op=diff
==============================================================================
--- trunk/libtest-manifest-perl/debian/patches/01-fix_manpage_section.patch (original)
+++ trunk/libtest-manifest-perl/debian/patches/01-fix_manpage_section.patch Mon Jun 30 18:44:32 2008
@@ -5,7 +5,7 @@
  		'lib/Manifest.pm'  => '$(INST_LIBDIR)/Manifest.pm',
  		},
 -	  
-+	
++
  	'MAN3PODS' =>
  		{
 -		'lib/Manifest.pm' => '$(INST_MAN3DIR)/Test::Manifest.3',

Modified: trunk/libtest-mockobject-perl/debian/patches/pod-fixes-MockObject.pm.diff
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libtest-mockobject-perl/debian/patches/pod-fixes-MockObject.pm.diff?rev=22548&op=diff
==============================================================================
--- trunk/libtest-mockobject-perl/debian/patches/pod-fixes-MockObject.pm.diff (original)
+++ trunk/libtest-mockobject-perl/debian/patches/pod-fixes-MockObject.pm.diff Mon Jun 30 18:44:32 2008
@@ -6,7 +6,7 @@
  
 -You can optionally add functions to the mocked module by passing them as name
 -=> coderef pairs to C<fake_module()>.  This is handy if you want to test an
-+You can optionally add functions to the mocked module by passing them as 
++You can optionally add functions to the mocked module by passing them as
 +name => coderef pairs to C<fake_module()>.  This is handy if you want to test an
  C<import()>:
  

Modified: trunk/libtest-warn-perl/debian/patches/language.patch
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libtest-warn-perl/debian/patches/language.patch?rev=22548&op=diff
==============================================================================
--- trunk/libtest-warn-perl/debian/patches/language.patch (original)
+++ trunk/libtest-warn-perl/debian/patches/language.patch Mon Jun 30 18:44:32 2008
@@ -60,9 +60,8 @@
  Note: C<warn "foo"> would print something like C<foo at -e line 1>. 
  This method ignores everything after the at. That means, to match this warning
  you would have to call C<warning_is {warn "foo"} "foo", "Foo succeeded">.
--If you need to test for a warning at an exactly line,
+ If you need to test for a warning at an exactly line,
 -try better something like C<warning_like {warn "foo"} qr/at XYZ.dat line 5/>.
-+If you need to test for a warning at an exactly line, 
 +try something like C<warning_like {warn "foo"} qr/at XYZ.dat line 5/>.
  
  warning_is and warning_are are only aliases to the same method.
@@ -138,7 +137,7 @@
 +Note that they have the hierarchical structure from perl 5.8.0,
 +which is slightly different from how it was organized up through perl 5.6.1.
 +(You can access the internal hierarchy with
-+C<$Test::Warn::Categorization::tree>, 
++C<$Test::Warn::Categorization::tree>,
 +although it isn't recommended).
  
  Thanks to the grouping in a tree,

Modified: trunk/libunicode-map8-perl-dfsg/debian/patches/aliases.patch
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libunicode-map8-perl-dfsg/debian/patches/aliases.patch?rev=22548&op=diff
==============================================================================
--- trunk/libunicode-map8-perl-dfsg/debian/patches/aliases.patch (original)
+++ trunk/libunicode-map8-perl-dfsg/debian/patches/aliases.patch Mon Jun 30 18:44:32 2008
@@ -1,6 +1,6 @@
 --- a/Map8/maps/aliases
 +++ b/Map8/maps/aliases
-@@ -75,11 +75,17 @@
+@@ -75,11 +75,17 @@ ISO_8859-3 8859-3 ISO-8859-3 ISO_8859-3:
  ISO_8859-4 8859-4 ISO-8859-4 ISO_8859-4:1988 iso-ir-110 iso8859-4 l4 latin4
  ISO_8859-5 8859-5 ISO-8859-5 ISO_8859-5:1988 cyrillic iso-ir-144 iso8859-5
  ISO_8859-6 8859-6 ASMO-708 ECMA-114 ISO-8859-6 ISO_8859-6:1987 arabic iso-ir-127 iso8859-6
@@ -20,7 +20,7 @@
  ISO_8859-supp iso-ir-154 latin1-2-5
  IT ISO646-IT iso-ir-15
  JIS_C6220-1969-jp JIS_C6220-1969 iso-ir-13 katakana x0201-7
-@@ -112,6 +118,10 @@
+@@ -112,6 +118,10 @@ SEN_850200_C ISO646-SE2 iso-ir-11 se2
  T.101-G2 iso-ir-128
  T.61-7bit iso-ir-102
  T.61-8bit T.61 iso-ir-103
@@ -31,7 +31,7 @@
  cp037 IBMUSCanada
  cp10000 MacRoman
  cp10006 MacGreek
-@@ -120,15 +130,15 @@
+@@ -120,15 +130,15 @@ cp10029 MacLatin2
  cp10079 MacIcelandic
  cp10081 MacTurkish
  cp1026 IBMLatin5Turkish
@@ -56,7 +56,7 @@
  cp437 DOSLatinUS
  cp500 IBMInternational
  cp737 DOSGreek
-@@ -151,6 +161,8 @@
+@@ -151,6 +161,8 @@ greek-ccitt iso-ir-150
  greek7 iso-ir-88
  greek7-old iso-ir-18
  hp-roman8 r8 roman8

Modified: trunk/libvorbis-perl/debian/patches/bts389571_give-ov_open-duplicate-handle.patch
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libvorbis-perl/debian/patches/bts389571_give-ov_open-duplicate-handle.patch?rev=22548&op=diff
==============================================================================
--- trunk/libvorbis-perl/debian/patches/bts389571_give-ov_open-duplicate-handle.patch (original)
+++ trunk/libvorbis-perl/debian/patches/bts389571_give-ov_open-duplicate-handle.patch Mon Jun 30 18:44:32 2008
@@ -5,8 +5,8 @@
          long ibytes
          CODE:
 +	FILE *dupfile;
-+	/* dup the file so that ov_clear() can close it behind 
-+	   Perl's back (Debian bug #389571) */ 
++	/* dup the file so that ov_clear() can close it behind
++	   Perl's back (Debian bug #389571) */
 +	dupfile = fdopen(dup(fileno(file)), "r");
 +
          /* we swapped file and self for an OO interface */

Modified: trunk/libxml-dom-perl/debian/patches/output_encoding.patch
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libxml-dom-perl/debian/patches/output_encoding.patch?rev=22548&op=diff
==============================================================================
--- trunk/libxml-dom-perl/debian/patches/output_encoding.patch (original)
+++ trunk/libxml-dom-perl/debian/patches/output_encoding.patch Mon Jun 30 18:44:32 2008
@@ -6,7 +6,7 @@
      my ($self, $fileName) = @_;
 -    my $fh = new FileHandle ($fileName, "w") || 
 +    my $encoding = $self->getXMLDecl()->getEncoding();
-+    my $fh = new FileHandle ($fileName, ">:encoding($encoding)") || 
++    my $fh = new FileHandle ($fileName, ">:encoding($encoding)") ||
  	croak "printToFile - can't open output file $fileName";
      
      $self->print ($fh);

Modified: trunk/libxml-mini-perl/debian/patches/header-attributes-sorting.diff
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libxml-mini-perl/debian/patches/header-attributes-sorting.diff?rev=22548&op=diff
==============================================================================
--- trunk/libxml-mini-perl/debian/patches/header-attributes-sorting.diff (original)
+++ trunk/libxml-mini-perl/debian/patches/header-attributes-sorting.diff Mon Jun 30 18:44:32 2008
@@ -51,7 +51,7 @@
 +    {
 +    	$attribString .= ' version="' . $self->{'_attributes'}->{'version'} . '"';
 +    }
-+     
++
 +    if (exists $self->{'_attributes'}->{'encoding'})
 +    {
 +    	$attribString .= ' encoding="' . $self->{'_attributes'}->{'encoding'} . '"';

Modified: trunk/libxml-sax-machines-perl/debian/patches/pseudo-hash.patch
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libxml-sax-machines-perl/debian/patches/pseudo-hash.patch?rev=22548&op=diff
==============================================================================
--- trunk/libxml-sax-machines-perl/debian/patches/pseudo-hash.patch (original)
+++ trunk/libxml-sax-machines-perl/debian/patches/pseudo-hash.patch Mon Jun 30 18:44:32 2008
@@ -8,11 +8,10 @@
 -        no strict 'refs';
 -        bless [ \%{ "${class}::FIELDS" } ];
 -    };
--
++    my $self = bless {}, $class;
+ 
 -    ## Pseudo hashes are badly borken in older Perls.  Should use something
 -    ## else, really.
-+    my $self = bless {}, $class;
-+    
      my %options = @_ ;
      $self->{$_} = $options{$_} for keys %options;
  

Modified: trunk/libxml-sax-machines-perl/debian/patches/vendorlibs.patch
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libxml-sax-machines-perl/debian/patches/vendorlibs.patch?rev=22548&op=diff
==============================================================================
--- trunk/libxml-sax-machines-perl/debian/patches/vendorlibs.patch (original)
+++ trunk/libxml-sax-machines-perl/debian/patches/vendorlibs.patch Mon Jun 30 18:44:32 2008
@@ -6,7 +6,7 @@
  sub MY::postamble { return <<'POSTAMBLE_END' }
 -install_site_config:
 -	$(PERL) -I$(PERL_ARCHLIB) -I$(PERL_LIB) -I$(INST_LIB) -I$(INSTALLSITELIB) -MXML::SAX::Machines::ConfigHelper -we 'XML::SAX::Machines::ConfigHelper::_write_site_config_if_absent(shift)' $(INSTALLSITELIB)
-+# we explicitly want to purge everything but the Perl core libs 
++# we explicitly want to purge everything but the Perl core libs
 +# and the install directory from @INC, so that a system-wide install
 +# of XML::SAX::Machines is not found by _write_site_config_if_absent()
 +

Modified: trunk/libxml-sax-perl/debian/patches/charset-decoding
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libxml-sax-perl/debian/patches/charset-decoding?rev=22548&op=diff
==============================================================================
--- trunk/libxml-sax-perl/debian/patches/charset-decoding (original)
+++ trunk/libxml-sax-perl/debian/patches/charset-decoding Mon Jun 30 18:44:32 2008
@@ -92,7 +92,7 @@
  
  # warn("utf-16\n");
 +# verify that the first element is correctly decoded
-+$handler->{test_elements} = [ "\x{9031}\x{5831}" ]; 
++$handler->{test_elements} = [ "\x{9031}\x{5831}" ];
  $parser->parse_uri("testfiles/utf-16.xml");
  ok(1);
  

Modified: trunk/libxml-sax-perl/debian/patches/parserdetails-debian
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libxml-sax-perl/debian/patches/parserdetails-debian?rev=22548&op=diff
==============================================================================
--- trunk/libxml-sax-perl/debian/patches/parserdetails-debian (original)
+++ trunk/libxml-sax-perl/debian/patches/parserdetails-debian Mon Jun 30 18:44:32 2008
@@ -43,8 +43,8 @@
  
 +    print STDERR "Debian build: won't modify ParserDetails.ini when installing.\n";
 +    print STDERR "              (use update-perl-sax-parsers(8) instead.)\n";
-+    return $script; 
-+    
++    return $script;
++
      # Only modify existing ParserDetails.ini if user agrees
  
      my $write_ini_ok = 0;
@@ -77,14 +77,14 @@
 +    # add parser
 +    $known_parsers = [];
 +    $class->add_parser($parser_module);
-+    
++
 +    # get parser's ParserDetails file
 +    my $file = $parser_module;
 +    $file = "${priority}-$file" if $priority != 0;
 +    $file = File::Spec->catfile($directory, $file);
 +    chmod 0644, $file;
 +    unlink($file);
-+    
++
 +    my $fh = gensym();
 +    open($fh, ">$file") ||
 +        die "Cannot write to $file: $!";

Modified: trunk/libxml-xpath-perl/debian/patches/test.patch
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libxml-xpath-perl/debian/patches/test.patch?rev=22548&op=diff
==============================================================================
--- trunk/libxml-xpath-perl/debian/patches/test.patch (original)
+++ trunk/libxml-xpath-perl/debian/patches/test.patch Mon Jun 30 18:44:32 2008
@@ -23,7 +23,7 @@
 +		child::*/
 +		processing-instruction("Fred")/
 +		self::node()[substr("33", 1, 1)]/
-+		attribute::ra[../@gunk] 
++		attribute::ra[../@gunk]
 +			[(../../@att="va\'l") and (@bert = "geee")]
 +			[position() = child::para/fred]
 +			[0 -.3]/
@@ -36,8 +36,8 @@
 +
 +warn "PATH: ", $path->as_string, "\n\n";
 +
-+if ($path->as_string) { # eq q^(self::node()/descendant-or-self::node()/child::tag/child::*/child::processing-instruction('Fred')/child::id((child::xml/child::vccc/child::bbbb/attribute::fer))/self::node()[(substr(('33'),(1),(1)))]/attribute::ra[(parent::node()/attribute::gunk)][((parent::node()/parent::node()/attribute::att = ('va&apos;l')) and ((attribute::bert = ('geee'))))][(position() = (child::para/child::fred))][(.3)]/child::geerner[((child::fart | (child::blert))[(child::predicate[(attribute::vee)])])])^ ) { 
-+	print "ok 4\n"; 
++if ($path->as_string) { # eq q^(self::node()/descendant-or-self::node()/child::tag/child::*/child::processing-instruction('Fred')/child::id((child::xml/child::vccc/child::bbbb/attribute::fer))/self::node()[(substr(('33'),(1),(1)))]/attribute::ra[(parent::node()/attribute::gunk)][((parent::node()/parent::node()/attribute::att = ('va&apos;l')) and ((attribute::bert = ('geee'))))][(position() = (child::para/child::fred))][(.3)]/child::geerner[((child::fart | (child::blert))[(child::predicate[(attribute::vee)])])])^ ) {
++	print "ok 4\n";
 +}
 +else { print "not ok 4\n"; }
 +




More information about the Pkg-perl-cvs-commits mailing list