diff -Nru libemail-outlook-message-perl-0.918/Build.PL libemail-outlook-message-perl-0.919/Build.PL --- libemail-outlook-message-perl-0.918/Build.PL 2014-10-28 17:02:29.000000000 +0000 +++ libemail-outlook-message-perl-0.919/Build.PL 2017-09-02 06:38:03.000000000 +0000 @@ -20,7 +20,7 @@ 'Email::MIME' => '1.923', 'Email::MIME::ContentType' => '1.014', 'Email::Sender' => '1.3', - 'Email::Simple' => '2.102', + 'Email::Simple' => '2.206', 'OLE::Storage_Lite' => '0.14', # Needed for testing 'IO::All' => '0', diff -Nru libemail-outlook-message-perl-0.918/CHANGELOG libemail-outlook-message-perl-0.919/CHANGELOG --- libemail-outlook-message-perl-0.918/CHANGELOG 1970-01-01 00:00:00.000000000 +0000 +++ libemail-outlook-message-perl-0.919/CHANGELOG 2017-09-02 06:38:03.000000000 +0000 @@ -0,0 +1,104 @@ +0.919 2017-09-02 + + - Write raw binary instead of utf8 (by Andreas Pflug) + - Fix default charset (by Gerrit Drost) + - Depend on known-good version of Email::Simple + - Add --outfile parameter to msgconvert (by Mirco Bauer) + +0.918 2014-10-28 + + - Correct encoding for text/plain parts to UTF8 + - Properly extract file base name in msgconvert + +0.917 2014-10-14 + + - Update documentation + - Require Perl 5.6 in Build.PL + - Ensure full body is rendered for multipart messages when msgconvert + delivers to mbox. + - Fix POD error in msgconvert (patch by Gregor Herrmann) + +0.916 2014-09-02 + + - Fix dependency list + - Fix documentation + - Specify version only in the main module + - Add link to GitHub from META files (patch by Gabor Szabo) + +0.915 2014-09-02 + + - Consistently output CRLF line endings + - Include msgconvert in this distribution + +0.914 2013-08-11 + + - Add version number to all modules + +0.913 2013-08-11 + + - Update dependency on Email::MIME and fix tests + +0.912 2012-07-27 + + - Fix test cases to deal with changed CRLF handling in Email::Simple + +0.911 2012-06-12 + + - Do not abort on unknown encodings. Warn instead. + - Replace deprecated dependencies with Email::MIME + +0.910 2010-08-10 + + - Major refactoring into different packages/classes. + - Read all fixed-length properties from all property streams. + - Improved logging of used and unused properties. + - Use package variables for important data structures for easier + extension. + - As a result, this module now requires perl 5.6. + +0.909 2009-10-11 + + - Handle (compressed) RTF version of message body. + +0.908 2009-09-27 + + Bugfix release: + - Applying patches by Jordan Hrycaj for CPAN bug #49495: + - Handle undefined OLE dates properly + - Parse root property stream to extract Date + - Skip more properties + - Actually handle References property + +0.907 2009-07-06 + + - Handle nested OLE files that are not .MSG files + +0.906 2009-03-14 + + - Make sure to_email_mime always returns a mime object, even if email has + no body + +0.905 2008-11-29 + + - Handle unicode data + +0.904 2008-02-28 + + - Remove spurious loading of Email::Abstract + - Code, comment and pod cleanups + - Use Build.PL instead of Makefile.PL for building + - Correct, locale independent, date formatting + +0.903 2007-10-14 + + - Dates from OLE and submission_id are GMT, not local time + +0.902 2007-10-10 + + - Fix pod coverage testing + +0.901 2007-09-24 + + - First release as module on CPAN + - Extracted main functionality of msgconvert.pl to + Email::Outlook::Message diff -Nru libemail-outlook-message-perl-0.918/Changes libemail-outlook-message-perl-0.919/Changes --- libemail-outlook-message-perl-0.918/Changes 2014-10-28 17:02:29.000000000 +0000 +++ libemail-outlook-message-perl-0.919/Changes 1970-01-01 00:00:00.000000000 +0000 @@ -1,97 +0,0 @@ -0.918 2014-10-28 - - - Correct encoding for text/plain parts to UTF8 - - Properly extract file base name in msgconvert - -0.917 2014-10-14 - - - Update documentation - - Require Perl 5.6 in Build.PL - - Ensure full body is rendered for multipart messages when msgconvert - delivers to mbox. - - Fix POD error in msgconvert (patch by Gregor Herrmann) - -0.916 2014-09-02 - - - Fix dependency list - - Fix documentation - - Specify version only in the main module - - Add link to GitHub from META files (patch by Gabor Szabo) - -0.915 2014-09-02 - - - Consistently output CRLF line endings - - Include msgconvert in this distribution - -0.914 2013-08-11 - - - Add version number to all modules - -0.913 2013-08-11 - - - Update dependency on Email::MIME and fix tests - -0.912 2012-07-27 - - - Fix test cases to deal with changed CRLF handling in Email::Simple - -0.911 2012-06-12 - - - Do not abort on unknown encodings. Warn instead. - - Replace deprecated dependencies with Email::MIME - -0.910 2010-08-10 - - - Major refactoring into different packages/classes. - - Read all fixed-length properties from all property streams. - - Improved logging of used and unused properties. - - Use package variables for important data structures for easier - extension. - - As a result, this module now requires perl 5.6. - -0.909 2009-10-11 - - - Handle (compressed) RTF version of message body. - -0.908 2009-09-27 - - Bugfix release: - - Applying patches by Jordan Hrycaj for CPAN bug #49495: - - Handle undefined OLE dates properly - - Parse root property stream to extract Date - - Skip more properties - - Actually handle References property - -0.907 2009-07-06 - - - Handle nested OLE files that are not .MSG files - -0.906 2009-03-14 - - - Make sure to_email_mime always returns a mime object, even if email has - no body - -0.905 2008-11-29 - - - Handle unicode data - -0.904 2008-02-28 - - - Remove spurious loading of Email::Abstract - - Code, comment and pod cleanups - - Use Build.PL instead of Makefile.PL for building - - Correct, locale independent, date formatting - -0.903 2007-10-14 - - - Dates from OLE and submission_id are GMT, not local time - -0.902 2007-10-10 - - - Fix pod coverage testing - -0.901 2007-09-24 - - - First release as module on CPAN - - Extracted main functionality of msgconvert.pl to - Email::Outlook::Message diff -Nru libemail-outlook-message-perl-0.918/debian/changelog libemail-outlook-message-perl-0.919/debian/changelog --- libemail-outlook-message-perl-0.918/debian/changelog 2017-01-04 17:24:12.000000000 +0000 +++ libemail-outlook-message-perl-0.919/debian/changelog 2017-11-21 18:31:05.000000000 +0000 @@ -1,3 +1,12 @@ +libemail-outlook-message-perl (0.919-1) unstable; urgency=medium + + * Import upstream version 0.919. + * Update years of packaging copyright. + * Bump versioned (build) dependency on libemail-simple-perl. + * Declare compliance with Debian Policy 4.1.1. + + -- gregor herrmann Tue, 21 Nov 2017 19:31:05 +0100 + libemail-outlook-message-perl (0.918-2) unstable; urgency=medium [ Salvatore Bonaccorso ] diff -Nru libemail-outlook-message-perl-0.918/debian/control libemail-outlook-message-perl-0.919/debian/control --- libemail-outlook-message-perl-0.918/debian/control 2017-01-04 16:47:15.000000000 +0000 +++ libemail-outlook-message-perl-0.919/debian/control 2017-11-21 18:31:05.000000000 +0000 @@ -4,23 +4,23 @@ gregor herrmann , Axel Beckert Section: perl +Testsuite: autopkgtest-pkg-perl Priority: optional Build-Depends: debhelper (>= 10), libmodule-build-perl (>= 0.380000) Build-Depends-Indep: libemail-mime-contenttype-perl, libemail-mime-perl (>= 1.923), libemail-sender-perl (>= 1.300000), - libemail-simple-perl (>= 2.102), + libemail-simple-perl (>= 2.206), libio-all-perl, libio-string-perl, libole-storage-lite-perl, libtest-pod-coverage-perl, perl -Standards-Version: 3.9.8 +Standards-Version: 4.1.1 Vcs-Browser: https://anonscm.debian.org/cgit/pkg-perl/packages/libemail-outlook-message-perl.git Vcs-Git: https://anonscm.debian.org/git/pkg-perl/packages/libemail-outlook-message-perl.git Homepage: https://metacpan.org/release/Email-Outlook-Message -Testsuite: autopkgtest-pkg-perl Package: libemail-outlook-message-perl Architecture: all @@ -29,7 +29,7 @@ libemail-mime-contenttype-perl, libemail-mime-perl (>= 1.923), libemail-sender-perl (>= 1.300000), - libemail-simple-perl (>= 2.102), + libemail-simple-perl (>= 2.206), libio-all-perl, libio-string-perl, libole-storage-lite-perl diff -Nru libemail-outlook-message-perl-0.918/debian/copyright libemail-outlook-message-perl-0.919/debian/copyright --- libemail-outlook-message-perl-0.918/debian/copyright 2017-01-04 16:47:15.000000000 +0000 +++ libemail-outlook-message-perl-0.919/debian/copyright 2017-11-21 18:31:05.000000000 +0000 @@ -9,7 +9,7 @@ Files: debian/* Copyright: 2010, Olly Betts - 2010-2015, gregor herrmann + 2010-2017, gregor herrmann License: Artistic or GPL-1+ License: Artistic diff -Nru libemail-outlook-message-perl-0.918/lib/Email/Outlook/Message.pm libemail-outlook-message-perl-0.919/lib/Email/Outlook/Message.pm --- libemail-outlook-message-perl-0.918/lib/Email/Outlook/Message.pm 2014-10-28 17:02:29.000000000 +0000 +++ libemail-outlook-message-perl-0.919/lib/Email/Outlook/Message.pm 2017-09-02 06:38:03.000000000 +0000 @@ -59,7 +59,7 @@ use warnings; use 5.006; use vars qw($VERSION); -$VERSION = "0.918"; +$VERSION = "0.919"; use Email::Simple; use Email::MIME::Creator; @@ -372,7 +372,7 @@ return Email::MIME->create( attributes => { content_type => "text/plain", - charset => "UTF8", + charset => "UTF-8", disposition => "inline", encoding => "8bit", }, @@ -441,7 +441,7 @@ } $buffer = substr $buffer, length $BASE_BUFFER; } elsif ($magic == $MAGIC_UNCOMPRESSED_RTF) { - $buffer = substr $data, length $BASE_BUFFER; + $buffer = substr $data, 16; } else { carp "Incorrect magic number in RTF body.\n"; } diff -Nru libemail-outlook-message-perl-0.918/Makefile.PL libemail-outlook-message-perl-0.919/Makefile.PL --- libemail-outlook-message-perl-0.918/Makefile.PL 2014-10-28 17:02:29.000000000 +0000 +++ libemail-outlook-message-perl-0.919/Makefile.PL 2017-09-02 06:38:03.000000000 +0000 @@ -1,4 +1,4 @@ -# Note: this file was auto-generated by Module::Build::Compat version 0.4210 +# Note: this file was auto-generated by Module::Build::Compat version 0.4224 require 5.006; use ExtUtils::MakeMaker; WriteMakefile @@ -10,7 +10,7 @@ 'Email::MIME' => '1.923', 'Email::MIME::ContentType' => '1.014', 'Email::Sender' => '1.3', - 'Email::Simple' => '2.102', + 'Email::Simple' => '2.206', 'Encode' => '0', 'File::Basename' => '0', 'Getopt::Long' => '0', diff -Nru libemail-outlook-message-perl-0.918/MANIFEST libemail-outlook-message-perl-0.919/MANIFEST --- libemail-outlook-message-perl-0.918/MANIFEST 2014-10-28 17:02:29.000000000 +0000 +++ libemail-outlook-message-perl-0.919/MANIFEST 2017-09-02 06:38:03.000000000 +0000 @@ -1,5 +1,5 @@ Build.PL -Changes +CHANGELOG lib/Email/Outlook/Message.pm lib/Email/Outlook/Message/AddressInfo.pm lib/Email/Outlook/Message/Attachment.pm diff -Nru libemail-outlook-message-perl-0.918/META.json libemail-outlook-message-perl-0.919/META.json --- libemail-outlook-message-perl-0.918/META.json 2014-10-28 17:02:29.000000000 +0000 +++ libemail-outlook-message-perl-0.919/META.json 2017-09-02 06:38:03.000000000 +0000 @@ -4,7 +4,7 @@ "unknown" ], "dynamic_config" : 1, - "generated_by" : "Module::Build version 0.421", + "generated_by" : "Module::Build version 0.4224", "license" : [ "perl_5" ], @@ -25,7 +25,7 @@ "Email::MIME" : "1.923", "Email::MIME::ContentType" : "1.014", "Email::Sender" : "1.3", - "Email::Simple" : "2.102", + "Email::Simple" : "2.206", "Encode" : "0", "File::Basename" : "0", "Getopt::Long" : "0", @@ -42,7 +42,7 @@ "provides" : { "Email::Outlook::Message" : { "file" : "lib/Email/Outlook/Message.pm", - "version" : "0.918" + "version" : "0.919" }, "Email::Outlook::Message::AddressInfo" : { "file" : "lib/Email/Outlook/Message/AddressInfo.pm" @@ -63,5 +63,6 @@ "url" : "https://github.com/mvz/email-outlook-message-perl" } }, - "version" : "0.918" + "version" : "0.919", + "x_serialization_backend" : "JSON::PP version 2.27400_02" } diff -Nru libemail-outlook-message-perl-0.918/META.yml libemail-outlook-message-perl-0.919/META.yml --- libemail-outlook-message-perl-0.918/META.yml 2014-10-28 17:02:29.000000000 +0000 +++ libemail-outlook-message-perl-0.919/META.yml 2017-09-02 06:38:03.000000000 +0000 @@ -6,7 +6,7 @@ configure_requires: Module::Build: '0.38' dynamic_config: 1 -generated_by: 'Module::Build version 0.421, CPAN::Meta::Converter version 2.142690' +generated_by: 'Module::Build version 0.4224, CPAN::Meta::Converter version 2.150010' license: perl meta-spec: url: http://module-build.sourceforge.net/META-spec-v1.4.html @@ -15,7 +15,7 @@ provides: Email::Outlook::Message: file: lib/Email/Outlook/Message.pm - version: '0.918' + version: '0.919' Email::Outlook::Message::AddressInfo: file: lib/Email/Outlook/Message/AddressInfo.pm Email::Outlook::Message::Attachment: @@ -27,7 +27,7 @@ Email::MIME: '1.923' Email::MIME::ContentType: '1.014' Email::Sender: '1.3' - Email::Simple: '2.102' + Email::Simple: '2.206' Encode: '0' File::Basename: '0' Getopt::Long: '0' @@ -41,4 +41,5 @@ resources: license: http://dev.perl.org/licenses/ repository: https://github.com/mvz/email-outlook-message-perl -version: '0.918' +version: '0.919' +x_serialization_backend: 'CPAN::Meta::YAML version 0.018' diff -Nru libemail-outlook-message-perl-0.918/README libemail-outlook-message-perl-0.919/README --- libemail-outlook-message-perl-0.918/README 2014-10-28 17:02:29.000000000 +0000 +++ libemail-outlook-message-perl-0.919/README 2017-09-02 06:38:03.000000000 +0000 @@ -12,7 +12,7 @@ VERSION - 0.918 + 0.919 INSTALLATION @@ -38,7 +38,7 @@ Email::MIME - 1.923 or later Email::MIME::ContentType - 1.014 or later Email::Sender - 1.3 or later - Email::Simple - 2.102 or later + Email::Simple - 2.206 or later OLE::Storage_Lite - 0.14 or later For testing: diff -Nru libemail-outlook-message-perl-0.918/script/msgconvert libemail-outlook-message-perl-0.919/script/msgconvert --- libemail-outlook-message-perl-0.918/script/msgconvert 2014-10-28 17:02:29.000000000 +0000 +++ libemail-outlook-message-perl-0.919/script/msgconvert 2017-09-02 06:38:03.000000000 +0000 @@ -16,10 +16,12 @@ # Setup command line processing. my $verbose = ''; my $mboxfile = ''; +my $outfile = ''; my $help = ''; # Print help message and exit. GetOptions( 'mbox=s' => \$mboxfile, 'verbose' => \$verbose, + 'outfile=s' => \$outfile, 'help|?' => \$help) or pod2usage(2); pod2usage(1) if $help; @@ -27,6 +29,11 @@ defined $ARGV[0] or pod2usage(2); my $using_mbox = $mboxfile ne ''; +my $using_outfile = $outfile ne ''; +if ($using_outfile && scalar @ARGV > 1) { + die "The --outfile parameter does not allow to specify more than one " . + ". See --help for more details."; +} my $transport; if ($using_mbox) { @@ -39,11 +46,15 @@ if ($using_mbox) { $transport->send($mail->as_string, { from => $mail->header('From') || '' }); } else { - my $basename = fileparse($file, qr/\.msg/i); - my $outfile = "$basename.eml"; - open OUT, ">:utf8", $outfile - or die "Can't open $outfile for writing: $!"; - binmode(OUT, ":utf8"); + if (!$using_outfile) { + my $basename = fileparse($file, qr/\.msg/i); + $outfile = "$basename.eml"; + } + if ($outfile eq '-') { + open OUT, ">&", STDOUT; + } else { + open OUT, ">", $outfile or die "Can't open $outfile for writing: $!"; + } print OUT $mail->as_string; close OUT; } @@ -62,10 +73,13 @@ msgconvert [options] ... +msgconvert --outfile + Options: - --mbox deliver messages to mbox file - --verbose be verbose - --help help message + --mbox deliver messages to mbox file + --outfile write message to or - for STDOUT + --verbose be verbose + --help help message =head1 OPTIONS @@ -76,6 +90,12 @@ Deliver to the given mbox file instead of creating individual .eml files. +=item B<--outfile> + + Writes the message into the outfile instead of individual .eml files. For + STDOUT "-" can be used as outfile. This option cannot be used together with + multiple instances. + =item B<--verbose> Print information about skipped parts of the .msg file. diff -Nru libemail-outlook-message-perl-0.918/t/internals.t libemail-outlook-message-perl-0.919/t/internals.t --- libemail-outlook-message-perl-0.918/t/internals.t 2014-10-28 17:02:29.000000000 +0000 +++ libemail-outlook-message-perl-0.919/t/internals.t 2017-09-02 06:38:03.000000000 +0000 @@ -63,7 +63,7 @@ ok(defined $m); ok(($m->parts) == 1); is($m->body, "plain"); - is($m->content_type, "text/plain; charset=\"UTF8\""); + is($m->content_type, "text/plain; charset=\"UTF-8\""); } sub test_to_email_mime_with_html_part {