[libemail-localdelivery-perl] 09/12: refresh 10mbox-locking.patch (fuzz)

[Florian Schlichting]

This is an automated email from the git hooks/post-receive script.

fsfs pushed a commit to branch master
in repository libemail-localdelivery-perl.

commit fc5f550e331c30904a8c34ae9ab4b64786b98a69
Author: Florian Schlichting <fsfs at debian.org>
Date:   Tue Aug 20 21:14:33 2013 +0200

    refresh 10mbox-locking.patch (fuzz)
---
 debian/patches/10mbox-locking.patch |   10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/debian/patches/10mbox-locking.patch b/debian/patches/10mbox-locking.patch
old mode 100755
new mode 100644
index 0b5ec4b..d9d991c
--- a/debian/patches/10mbox-locking.patch
+++ b/debian/patches/10mbox-locking.patch
@@ -7,7 +7,7 @@
 @DPATCH@
 --- a/lib/Email/LocalDelivery/Mbox.pm
 +++ b/lib/Email/LocalDelivery/Mbox.pm
-@@ -4,7 +4,7 @@ use strict;
+@@ -10,7 +10,7 @@
  use File::Path;
  use File::Basename;
  use Email::Simple 1.998;  # needed for ->header_obj
@@ -15,8 +15,8 @@
 +use Fcntl qw(:DEFAULT :seek);
  use Symbol qw(gensym);
  
- use vars qw($VERSION);
-@@ -37,7 +37,7 @@ sub deliver {
+ sub deliver {
+@@ -40,7 +40,7 @@
      # This will make streaming a bit more annoying. -- rjbs, 2007-05-25
      print $fh "\n" unless $email->as_string =~ /\n$/;
  
@@ -25,7 +25,7 @@
      push @rv, $file;
    }
    return @rv;
-@@ -50,14 +50,14 @@ sub _open_fh {
+@@ -53,14 +53,14 @@
  
    my $fh = gensym;
    open $fh, ">> $file" or return;
@@ -43,7 +43,7 @@
    close $fh or return;
    return 1;
  }
-@@ -98,17 +98,69 @@ sub _from_line_boring {
+@@ -101,17 +101,69 @@
  }
  
  sub getlock {

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libemail-localdelivery-perl.git