r49274 - in /branches/upstream/libemail-mime-perl/current: Changes META.yml lib/Email/MIME.pm lib/Email/MIME/Creator.pm lib/Email/MIME/Header.pm lib/Email/MIME/Modifier.pm

[jawnsy-guest at users.alioth.debian.org]

Author: jawnsy-guest
Date: Wed Dec 23 16:55:51 2009
New Revision: 49274

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=49274
Log:
[svn-upgrade] Integrating new upstream version, libemail-mime-perl (1.903)

Modified:
    branches/upstream/libemail-mime-perl/current/Changes
    branches/upstream/libemail-mime-perl/current/META.yml
    branches/upstream/libemail-mime-perl/current/lib/Email/MIME.pm
    branches/upstream/libemail-mime-perl/current/lib/Email/MIME/Creator.pm
    branches/upstream/libemail-mime-perl/current/lib/Email/MIME/Header.pm
    branches/upstream/libemail-mime-perl/current/lib/Email/MIME/Modifier.pm

Modified: branches/upstream/libemail-mime-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libemail-mime-perl/current/Changes?rev=49274&op=diff
==============================================================================
--- branches/upstream/libemail-mime-perl/current/Changes (original)
+++ branches/upstream/libemail-mime-perl/current/Changes Wed Dec 23 16:55:51 2009
@@ -1,4 +1,7 @@
 Revision history for Perl extension Email::MIME.
+
+1.903   2009-12-23
+        correct typo in body_set_str (RT #53004) (thanks, Herbert Leitz)
 
 1.902   2009-11-11
         allow for padding spaces in the Content-Transfer-Encoding header

Modified: branches/upstream/libemail-mime-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libemail-mime-perl/current/META.yml?rev=49274&op=diff
==============================================================================
--- branches/upstream/libemail-mime-perl/current/META.yml (original)
+++ branches/upstream/libemail-mime-perl/current/META.yml Wed Dec 23 16:55:51 2009
@@ -1,6 +1,6 @@
 --- #YAML:1.0
 name:               Email-MIME
-version:            1.902
+version:            1.903
 abstract:           ~
 author:  []
 license:            perl

Modified: branches/upstream/libemail-mime-perl/current/lib/Email/MIME.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libemail-mime-perl/current/lib/Email/MIME.pm?rev=49274&op=diff
==============================================================================
--- branches/upstream/libemail-mime-perl/current/lib/Email/MIME.pm (original)
+++ branches/upstream/libemail-mime-perl/current/lib/Email/MIME.pm Wed Dec 23 16:55:51 2009
@@ -21,7 +21,7 @@
 
 =head1 VERSION
 
-version 1.902
+version 1.903
 
 =head1 SYNOPSIS
 
@@ -111,7 +111,7 @@
 
 =cut
 
-our $VERSION = '1.902';
+our $VERSION = '1.903';
 
 use vars qw[$CREATOR];
 $CREATOR = 'Email::MIME::Creator';
@@ -572,7 +572,7 @@
 
   my $ct = parse_content_type($self->content_type);
   Carp::confess("body_str was given, but no charset is defined")
-    unless my $charset = $ct->{attributse}{charset};
+    unless my $charset = $ct->{attributes}{charset};
 
   my $body_octets = Encode::encode($charset, $body_str, 1);
   $self->body_set($body_octets);
@@ -688,7 +688,7 @@
 =head2 walk_parts
 
   $email->walk_parts(sub {
-      my $part = @_;
+      my ($part) = @_;
       return if $part->parts > 1; # multipart
       
       if ( $part->content_type =~ m[text/html] ) {

Modified: branches/upstream/libemail-mime-perl/current/lib/Email/MIME/Creator.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libemail-mime-perl/current/lib/Email/MIME/Creator.pm?rev=49274&op=diff
==============================================================================
--- branches/upstream/libemail-mime-perl/current/lib/Email/MIME/Creator.pm (original)
+++ branches/upstream/libemail-mime-perl/current/lib/Email/MIME/Creator.pm Wed Dec 23 16:55:51 2009
@@ -2,7 +2,7 @@
 use strict;
 
 use vars qw[$VERSION];
-$VERSION = '1.902';
+$VERSION = '1.903';
 
 use base q[Email::Simple::Creator];
 use Email::MIME;

Modified: branches/upstream/libemail-mime-perl/current/lib/Email/MIME/Header.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libemail-mime-perl/current/lib/Email/MIME/Header.pm?rev=49274&op=diff
==============================================================================
--- branches/upstream/libemail-mime-perl/current/lib/Email/MIME/Header.pm (original)
+++ branches/upstream/libemail-mime-perl/current/lib/Email/MIME/Header.pm Wed Dec 23 16:55:51 2009
@@ -3,7 +3,7 @@
 package Email::MIME::Header;
 use base 'Email::Simple::Header';
 
-our $VERSION = '1.902';
+our $VERSION = '1.903';
 
 use Encode 1.9801;
 

Modified: branches/upstream/libemail-mime-perl/current/lib/Email/MIME/Modifier.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libemail-mime-perl/current/lib/Email/MIME/Modifier.pm?rev=49274&op=diff
==============================================================================
--- branches/upstream/libemail-mime-perl/current/lib/Email/MIME/Modifier.pm (original)
+++ branches/upstream/libemail-mime-perl/current/lib/Email/MIME/Modifier.pm Wed Dec 23 16:55:51 2009
@@ -4,7 +4,7 @@
 package Email::MIME::Modifier;
 
 use vars qw[$VERSION];
-$VERSION = '1.902';
+$VERSION = '1.903';
 
 use Email::MIME;
 
@@ -16,7 +16,7 @@
 
 =head1 VERSION
 
-version 1.902
+version 1.903
 
 =head1 PERL EMAIL PROJECT