[138523] trunk/dports/perl/p5-mail-mboxparser

khindenburg at macports.org khindenburg at macports.org
Fri Jul 10 17:43:47 PDT 2015


Revision: 138523
          https://trac.macports.org/changeset/138523
Author:   khindenburg at macports.org
Date:     2015-07-10 17:43:47 -0700 (Fri, 10 Jul 2015)
Log Message:
-----------
p5-mail-mboxparser: add 4 debian patches - one fixes #46447

Modified Paths:
--------------
    trunk/dports/perl/p5-mail-mboxparser/Portfile

Added Paths:
-----------
    trunk/dports/perl/p5-mail-mboxparser/files/
    trunk/dports/perl/p5-mail-mboxparser/files/fix-spelling-error-in-manpage.patch
    trunk/dports/perl/p5-mail-mboxparser/files/fix_messageparser_interaction
    trunk/dports/perl/p5-mail-mboxparser/files/perl-Mail-MboxParser-0.55-Fix-garbled-attachment-name-RT-66576.patch
    trunk/dports/perl/p5-mail-mboxparser/files/pod-encoding.patch

Modified: trunk/dports/perl/p5-mail-mboxparser/Portfile
===================================================================
--- trunk/dports/perl/p5-mail-mboxparser/Portfile	2015-07-10 23:48:16 UTC (rev 138522)
+++ trunk/dports/perl/p5-mail-mboxparser/Portfile	2015-07-11 00:43:47 UTC (rev 138523)
@@ -6,7 +6,7 @@
 
 perl5.branches      5.16 5.18 5.20
 perl5.setup         Mail-MboxParser 0.55
-revision            3
+revision            4
 license             {Artistic-1 GPL}
 platforms           darwin
 maintainers         nomaintainer
@@ -19,6 +19,11 @@
 checksums           rmd160  fdbd521b41d28062d7710859a074453699524582 \
                     sha256  33f025e9b10956b9a58ef01774b92b790aacca5fb00b1c755ada77ad4e5c7d3b
 
+patchfiles          fix-spelling-error-in-manpage.patch \
+                    perl-Mail-MboxParser-0.55-Fix-garbled-attachment-name-RT-66576.patch \
+                    fix_messageparser_interaction \
+                    pod-encoding.patch
+
 if {${perl5.major} != ""} {
     depends_lib-append \
                     port:p${perl5.major}-mime-tools

Added: trunk/dports/perl/p5-mail-mboxparser/files/fix-spelling-error-in-manpage.patch
===================================================================
--- trunk/dports/perl/p5-mail-mboxparser/files/fix-spelling-error-in-manpage.patch	                        (rev 0)
+++ trunk/dports/perl/p5-mail-mboxparser/files/fix-spelling-error-in-manpage.patch	2015-07-11 00:43:47 UTC (rev 138523)
@@ -0,0 +1,41 @@
+Description: Fix spelling errors in manpage
+Origin: vendor
+Bug: https://rt.cpan.org/Ticket/Display.html?id=69086
+Forwarded: yes
+Author: Salvatore Bonaccorso <carnil at debian.org>
+Reviewed-by: gregor herrmann <gregoa at debian.org>
+Last-Update: 2013-06-02
+
+--- MboxParser/Mail.pm
++++ MboxParser/Mail.pm
+@@ -689,7 +689,7 @@
+ See L<Encode::Supported> for a list of encodings that you may use.
+     
+ Returns the filename under which the attachment has been saved. undef is
+-returned in case the entity did not contain a saveable attachement, there was
++returned in case the entity did not contain a saveable attachment, there was
+ no such entity at all or there was something wrong with the 'path' you
+ specified. Check C<$mail-E<gt>error> to find out which of these possibilities
+ apply.
+@@ -773,10 +773,10 @@
+ =item B<store_all_attachments(options)>  
+ 
+ Walks through an entire mail and stores all apparent attachments. 'options' are
+-exactly the same as in C<store_attachement()> with the same behaviour if no
++exactly the same as in C<store_attachment()> with the same behaviour if no
+ options are given. 
+ 
+-Returns a list of files that have been succesfully saved and an empty list if
++Returns a list of files that have been successfully saved and an empty list if
+ no attachment could be extracted.
+ 
+ C<$mail-E<gt>error> will tell you possible failures and a possible explanation
+@@ -820,7 +820,7 @@
+ 
+ =item B<get_attachments(file)>
+ 
+-This method returns a mapping from attachment-names (if those are savable) to
++This method returns a mapping from attachment-names (if those are saveable) to
+ index-numbers of the MIME-part that represents this attachment. It returns a
+ hash-reference, the file-names being the key and the index the value:
+ 

Added: trunk/dports/perl/p5-mail-mboxparser/files/fix_messageparser_interaction
===================================================================
--- trunk/dports/perl/p5-mail-mboxparser/files/fix_messageparser_interaction	                        (rev 0)
+++ trunk/dports/perl/p5-mail-mboxparser/files/fix_messageparser_interaction	2015-07-11 00:43:47 UTC (rev 138523)
@@ -0,0 +1,34 @@
+fix_messageparser_interaction
+
+Fix hang during t/3_while test with recent Mail::Mbox::MessageParser.
+See Debian bug #395268.
+Patch by David Coppit <david at coppit.org>
+
+--- MboxParser.pm
++++ MboxParser.pm
+@@ -519,7 +519,6 @@
+ 
+     return undef if ref(\$p) eq 'SCALAR' or $p->end_of_file;
+ 
+-    seek $self->{READER}, $self->{CURR_POS}, SEEK_SET;
+     my $nl = $self->{NL};
+     my $mailref = $p->read_next_email;
+     my ($header, $body) = split /$nl$nl/, $$mailref, 2;
+@@ -793,7 +792,8 @@
+     my $self = shift;
+     my $h = $self->{READER};
+     my $newline;
+-    
++
++    my $old_position = tell $h;
+     seek $h, 0, SEEK_SET;
+     while (sysread $h, (my $c), 1) {
+         if (ord($c) == 13) {
+@@ -807,6 +807,7 @@
+             last;
+         }
+     }
++    seek($h, $old_position, 0);
+     return $newline;
+ }
+ 

Added: trunk/dports/perl/p5-mail-mboxparser/files/perl-Mail-MboxParser-0.55-Fix-garbled-attachment-name-RT-66576.patch
===================================================================
--- trunk/dports/perl/p5-mail-mboxparser/files/perl-Mail-MboxParser-0.55-Fix-garbled-attachment-name-RT-66576.patch	                        (rev 0)
+++ trunk/dports/perl/p5-mail-mboxparser/files/perl-Mail-MboxParser-0.55-Fix-garbled-attachment-name-RT-66576.patch	2015-07-11 00:43:47 UTC (rev 138523)
@@ -0,0 +1,30 @@
+From 122efb9b43fe3b918190f1e72a8055240571d58b Mon Sep 17 00:00:00 2001
+From: =?UTF-8?q?Petr=20P=C3=ADsa=C5=99?= <ppisar at redhat.com>
+Date: Thu, 23 Jun 2011 09:13:12 +0200
+Subject: [PATCH] Fix garbled attachment name (RT#66576)
+
+---
+ t/10_qpnames.t |    3 ++-
+ 1 files changed, 2 insertions(+), 1 deletions(-)
+
+diff --git a/t/10_qpnames.t b/t/10_qpnames.t
+index 7c9b42c..4db5af6 100755
+--- t/10_qpnames.t
++++ t/10_qpnames.t
+@@ -1,3 +1,4 @@
++use utf8;
+ use Test;
+ use File::Spec;
+ use strict;
+@@ -12,7 +13,7 @@ my ($msg) = $mb->get_messages;
+ 
+ my $att = $msg->get_attachments;
+ skip(&Mail::MboxParser::Mail::HAVE_MIMEWORDS ? 0 : "Mime::Words not installed",
+-     defined $msg->get_attachments("test \xFE\xF0\xFC\xFD\xE7\xF6 characters.txt"));
++     defined $msg->get_attachments("test şğüıçö characters.txt"));
+ 
+ 
+ 
+-- 
+1.7.5.4
+

Added: trunk/dports/perl/p5-mail-mboxparser/files/pod-encoding.patch
===================================================================
--- trunk/dports/perl/p5-mail-mboxparser/files/pod-encoding.patch	                        (rev 0)
+++ trunk/dports/perl/p5-mail-mboxparser/files/pod-encoding.patch	2015-07-11 00:43:47 UTC (rev 138523)
@@ -0,0 +1,19 @@
+Description: add =encoding to POD, required by perl 5.17.x
+Origin: vendor
+Bug: https://rt.cpan.org/Ticket/Display.html?id=85805
+Bug-Debian: http://bugs.debian.org/710798
+Forwarded: https://rt.cpan.org/Ticket/Display.html?id=85805
+Author: gregor herrmann <gregoa at debian.org>
+Last-Update: 2013-06-02
+
+--- MboxParser/Mail.pm
++++ MboxParser/Mail.pm
+@@ -14,6 +14,8 @@
+ 
+ # ----------------------------------------------------------------
+ 
++=encoding latin1
++
+ =head1 NAME
+ 
+ Mail::MboxParser::Mail - Provide mail-objects and methods upon
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://lists.macosforge.org/pipermail/macports-changes/attachments/20150710/d77e58e9/attachment-0001.html>


More information about the macports-changes mailing list