r5968 - in /packages/libdatetime-format-mail-perl/branches/upstream/current: ./ lib/DateTime/Format/ notes/ t/
gwolf at users.alioth.debian.org
gwolf at users.alioth.debian.org
Wed Jul 25 22:38:01 UTC 2007
Author: gwolf
Date: Wed Jul 25 22:38:01 2007
New Revision: 5968
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=5968
Log:
[svn-upgrade] Integrating new upstream version, libdatetime-format-mail-perl-dfsg (0.30+dfsg)
Added:
packages/libdatetime-format-mail-perl/branches/upstream/current/notes/
packages/libdatetime-format-mail-perl/branches/upstream/current/t/parse-strict.t
Removed:
packages/libdatetime-format-mail-perl/branches/upstream/current/SIGNATURE
Modified:
packages/libdatetime-format-mail-perl/branches/upstream/current/Build.PL
packages/libdatetime-format-mail-perl/branches/upstream/current/Changes
packages/libdatetime-format-mail-perl/branches/upstream/current/MANIFEST
packages/libdatetime-format-mail-perl/branches/upstream/current/META.yml
packages/libdatetime-format-mail-perl/branches/upstream/current/Makefile.PL
packages/libdatetime-format-mail-perl/branches/upstream/current/lib/DateTime/Format/Mail.pm
packages/libdatetime-format-mail-perl/branches/upstream/current/t/00signature.t
packages/libdatetime-format-mail-perl/branches/upstream/current/t/basic.t
packages/libdatetime-format-mail-perl/branches/upstream/current/t/format.t
packages/libdatetime-format-mail-perl/branches/upstream/current/t/invalid.t
packages/libdatetime-format-mail-perl/branches/upstream/current/t/parse.t
packages/libdatetime-format-mail-perl/branches/upstream/current/t/sample.t
packages/libdatetime-format-mail-perl/branches/upstream/current/t/sample_dates
Modified: packages/libdatetime-format-mail-perl/branches/upstream/current/Build.PL
URL: http://svn.debian.org/wsvn/pkg-perl/packages/libdatetime-format-mail-perl/branches/upstream/current/Build.PL?rev=5968&op=diff
==============================================================================
--- packages/libdatetime-format-mail-perl/branches/upstream/current/Build.PL (original)
+++ packages/libdatetime-format-mail-perl/branches/upstream/current/Build.PL Wed Jul 25 22:38:01 2007
@@ -9,6 +9,6 @@
'Params::Validate' => '0.67',
'Test::More' => '0.47',
},
- sign => 1,
+ build_requires => { 'Module::Build' => 0 },
create_makefile_pl => 'passthrough',
)->create_build_script;
Modified: packages/libdatetime-format-mail-perl/branches/upstream/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/packages/libdatetime-format-mail-perl/branches/upstream/current/Changes?rev=5968&op=diff
==============================================================================
--- packages/libdatetime-format-mail-perl/branches/upstream/current/Changes (original)
+++ packages/libdatetime-format-mail-perl/branches/upstream/current/Changes Wed Jul 25 22:38:01 2007
@@ -1,4 +1,13 @@
# Change log for DateTime::Format::Mail
+
+---
+version: 0.30
+date; 24 Jul 2006
+changes:
+ - The strict parsing made the day name mandatory, even though
+ RFC822 and 2822 specify it as optional. Reported by Julian
+ Mehnle.
+ - Turned off signing, since it seems to be causing more trouble than it's worth.
---
version: 0.2901
Modified: packages/libdatetime-format-mail-perl/branches/upstream/current/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/packages/libdatetime-format-mail-perl/branches/upstream/current/MANIFEST?rev=5968&op=diff
==============================================================================
--- packages/libdatetime-format-mail-perl/branches/upstream/current/MANIFEST (original)
+++ packages/libdatetime-format-mail-perl/branches/upstream/current/MANIFEST Wed Jul 25 22:38:01 2007
@@ -10,8 +10,6 @@
MANIFEST
MANIFEST.SKIP
META.yml
-notes/rfc2822.txt
-notes/rfc822.txt
README
t/00signature.t
t/99pod.t
@@ -19,9 +17,8 @@
t/fixyears.t
t/format.t
t/invalid.t
+t/parse-strict.t
t/parse.t
t/sample.t
t/sample_dates
t/timezones.t
-
-SIGNATURE Added here by Module::Build
Modified: packages/libdatetime-format-mail-perl/branches/upstream/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/packages/libdatetime-format-mail-perl/branches/upstream/current/META.yml?rev=5968&op=diff
==============================================================================
--- packages/libdatetime-format-mail-perl/branches/upstream/current/META.yml (original)
+++ packages/libdatetime-format-mail-perl/branches/upstream/current/META.yml Wed Jul 25 22:38:01 2007
@@ -1,17 +1,26 @@
---- #YAML:1.0
+---
name: DateTime-Format-Mail
-version: 0.2901
+version: 0.30
+author:
+ - |-
+ Originally written by Iain Truskett <spoon at cpan.org>, who died on
+ December 29, 2003.
+ - Maintained by Dave Rolsky <autarch at urth.org>.
+abstract: Convert between DateTime and RFC2822/822 formats
license: perl
-distribution_type: module
+resources:
+ license: http://dev.perl.org/licenses/
requires:
DateTime: 0.1705
Params::Validate: 0.67
Test::More: 0.47
-recommends: {}
-build_requires: {}
-conflicts: {}
+build_requires:
+ Module::Build: 0
provides:
DateTime::Format::Mail:
file: lib/DateTime/Format/Mail.pm
- version: 0.2901
-generated_by: Module::Build version 0.21
+ version: 0.30
+generated_by: Module::Build version 0.2801
+meta-spec:
+ url: http://module-build.sourceforge.net/META-spec-v1.2.html
+ version: 1.2
Modified: packages/libdatetime-format-mail-perl/branches/upstream/current/Makefile.PL
URL: http://svn.debian.org/wsvn/pkg-perl/packages/libdatetime-format-mail-perl/branches/upstream/current/Makefile.PL?rev=5968&op=diff
==============================================================================
--- packages/libdatetime-format-mail-perl/branches/upstream/current/Makefile.PL (original)
+++ packages/libdatetime-format-mail-perl/branches/upstream/current/Makefile.PL Wed Jul 25 22:38:01 2007
@@ -1,4 +1,5 @@
-
+# Note: this file was auto-generated by Module::Build::Compat version 0.03
+
unless (eval "use Module::Build::Compat 0.02; 1" ) {
print "This module requires Module::Build to install itself.\n";
@@ -7,22 +8,24 @@
(' Install Module::Build now from CPAN?', 'y');
unless ($yn =~ /^y/i) {
- warn " *** Cannot install without Module::Build. Exiting ...\n";
- exit 1;
+ die " *** Cannot install without Module::Build. Exiting ...\n";
}
-
+
require Cwd;
require File::Spec;
require CPAN;
# Save this 'cause CPAN will chdir all over the place.
my $cwd = Cwd::cwd();
- my $makefile = File::Spec->rel2abs($0);
CPAN::Shell->install('Module::Build::Compat');
+ CPAN::Shell->expand("Module", "Module::Build::Compat")->uptodate
+ or die "Couldn't install Module::Build, giving up.\n";
chdir $cwd or die "Cannot chdir() back to $cwd: $!";
- exec $^X, $makefile, @ARGV; # Redo now that we have Module::Build
}
+ eval "use Module::Build::Compat 0.02; 1" or die $@;
+
Module::Build::Compat->run_build_pl(args => \@ARGV);
- Module::Build::Compat->write_makefile();
+ require Module::Build;
+ Module::Build::Compat->write_makefile(build_class => 'Module::Build');
Modified: packages/libdatetime-format-mail-perl/branches/upstream/current/lib/DateTime/Format/Mail.pm
URL: http://svn.debian.org/wsvn/pkg-perl/packages/libdatetime-format-mail-perl/branches/upstream/current/lib/DateTime/Format/Mail.pm?rev=5968&op=diff
==============================================================================
--- packages/libdatetime-format-mail-perl/branches/upstream/current/lib/DateTime/Format/Mail.pm (original)
+++ packages/libdatetime-format-mail-perl/branches/upstream/current/lib/DateTime/Format/Mail.pm Wed Jul 25 22:38:01 2007
@@ -1,5 +1,5 @@
package DateTime::Format::Mail;
-# $Id: Mail.pm,v 1.17 2004/01/26 19:11:07 autarch Exp $
+# $Id: Mail.pm 3459 2006-07-24 12:39:08Z autarch $
use strict;
use 5.005;
@@ -8,7 +8,7 @@
use Params::Validate qw( validate validate_pos SCALAR );
use vars qw( $VERSION );
-$VERSION = '0.2901';
+$VERSION = '0.30';
my %validations = (
year_cutoff => {
@@ -42,9 +42,11 @@
my $strict_RE = qr{
^ \s* # optional
# [day-of-week "," ]
- (?:Mon|Tue|Wed|Thu|Fri|Sat|Sun) ,
+ (?:
+ (?:Mon|Tue|Wed|Thu|Fri|Sat|Sun) ,
+ \s+
+ )?
# date => day month year
- \s+
(\d{1,2}) # day => 1*2DIGIT
\s+
(Jan|Feb|Mar|Apr|May|Jun|Jul|Aug|Sep|Oct|Nov|Dec) # month-name
Modified: packages/libdatetime-format-mail-perl/branches/upstream/current/t/00signature.t
URL: http://svn.debian.org/wsvn/pkg-perl/packages/libdatetime-format-mail-perl/branches/upstream/current/t/00signature.t?rev=5968&op=diff
==============================================================================
--- packages/libdatetime-format-mail-perl/branches/upstream/current/t/00signature.t (original)
+++ packages/libdatetime-format-mail-perl/branches/upstream/current/t/00signature.t Wed Jul 25 22:38:01 2007
@@ -1,4 +1,4 @@
-# $Id: 00signature.t,v 1.1 2003/04/04 05:35:27 koschei Exp $
+# $Id: 00signature.t 955 2003-04-04 05:35:27Z koschei $
use strict;
use Test::More tests => 1;
Modified: packages/libdatetime-format-mail-perl/branches/upstream/current/t/basic.t
URL: http://svn.debian.org/wsvn/pkg-perl/packages/libdatetime-format-mail-perl/branches/upstream/current/t/basic.t?rev=5968&op=diff
==============================================================================
--- packages/libdatetime-format-mail-perl/branches/upstream/current/t/basic.t (original)
+++ packages/libdatetime-format-mail-perl/branches/upstream/current/t/basic.t Wed Jul 25 22:38:01 2007
@@ -1,4 +1,4 @@
-# $Id: basic.t,v 1.4 2003/10/21 14:54:56 koschei Exp $
+# $Id: basic.t 991 2003-10-21 14:54:56Z koschei $
use strict;
use Test::More tests => 8;
use vars qw( $class );
Modified: packages/libdatetime-format-mail-perl/branches/upstream/current/t/format.t
URL: http://svn.debian.org/wsvn/pkg-perl/packages/libdatetime-format-mail-perl/branches/upstream/current/t/format.t?rev=5968&op=diff
==============================================================================
--- packages/libdatetime-format-mail-perl/branches/upstream/current/t/format.t (original)
+++ packages/libdatetime-format-mail-perl/branches/upstream/current/t/format.t Wed Jul 25 22:38:01 2007
@@ -1,4 +1,4 @@
-# $Id: format.t,v 1.1 2003/04/04 05:35:27 koschei Exp $
+# $Id: format.t 955 2003-04-04 05:35:27Z koschei $
use strict;
use Test::More tests => 7;
Modified: packages/libdatetime-format-mail-perl/branches/upstream/current/t/invalid.t
URL: http://svn.debian.org/wsvn/pkg-perl/packages/libdatetime-format-mail-perl/branches/upstream/current/t/invalid.t?rev=5968&op=diff
==============================================================================
--- packages/libdatetime-format-mail-perl/branches/upstream/current/t/invalid.t (original)
+++ packages/libdatetime-format-mail-perl/branches/upstream/current/t/invalid.t Wed Jul 25 22:38:01 2007
@@ -1,4 +1,4 @@
-# $Id: invalid.t,v 1.3 2003/06/03 01:15:43 koschei Exp $
+# $Id: invalid.t 965 2003-06-03 01:15:43Z koschei $
use strict;
use Test::More tests => 24;
Added: packages/libdatetime-format-mail-perl/branches/upstream/current/t/parse-strict.t
URL: http://svn.debian.org/wsvn/pkg-perl/packages/libdatetime-format-mail-perl/branches/upstream/current/t/parse-strict.t?rev=5968&op=file
==============================================================================
--- packages/libdatetime-format-mail-perl/branches/upstream/current/t/parse-strict.t (added)
+++ packages/libdatetime-format-mail-perl/branches/upstream/current/t/parse-strict.t Wed Jul 25 22:38:01 2007
@@ -1,0 +1,25 @@
+use strict;
+use Test::More tests => 4;
+
+use DateTime::Format::Mail;
+
+
+my $f = DateTime::Format::Mail->new();
+
+while (<DATA>)
+{
+ chomp;
+ my ($s, $e) = split /\s*\t\s*/, $_;
+ $e ||= $s;
+
+ my $p = $f->format_datetime($f->parse_datetime($s));
+ is $p => $e, $s;
+}
+
+
+
+__DATA__
+Wed, 12 Mar 2003 03:22:58 MDT Wed, 12 Mar 2003 03:22:58 -0600
+Wed, 12 Mar 03 03:22:58 -0500 Wed, 12 Mar 2003 03:22:58 -0500
+01 Feb 2002 16:06:38 -0500 Fri, 01 Feb 2002 16:06:38 -0500
+01 Dec 2002 05:53:06 +0800 Sun, 01 Dec 2002 05:53:06 +0800
Modified: packages/libdatetime-format-mail-perl/branches/upstream/current/t/parse.t
URL: http://svn.debian.org/wsvn/pkg-perl/packages/libdatetime-format-mail-perl/branches/upstream/current/t/parse.t?rev=5968&op=diff
==============================================================================
--- packages/libdatetime-format-mail-perl/branches/upstream/current/t/parse.t (original)
+++ packages/libdatetime-format-mail-perl/branches/upstream/current/t/parse.t Wed Jul 25 22:38:01 2007
@@ -1,4 +1,4 @@
-# $Id: parse.t,v 1.1 2003/04/04 05:35:27 koschei Exp $
+# $Id: parse.t 955 2003-04-04 05:35:27Z koschei $
use strict;
use Test::More tests => 10;
use DateTime;
Modified: packages/libdatetime-format-mail-perl/branches/upstream/current/t/sample.t
URL: http://svn.debian.org/wsvn/pkg-perl/packages/libdatetime-format-mail-perl/branches/upstream/current/t/sample.t?rev=5968&op=diff
==============================================================================
--- packages/libdatetime-format-mail-perl/branches/upstream/current/t/sample.t (original)
+++ packages/libdatetime-format-mail-perl/branches/upstream/current/t/sample.t Wed Jul 25 22:38:01 2007
@@ -1,4 +1,4 @@
-# $Id: sample.t,v 1.4 2003/08/01 06:29:00 autarch Exp $
+# $Id: sample.t 983 2003-08-01 06:29:00Z autarch $
use strict;
use Test::More tests => 2;
use DateTime;
Modified: packages/libdatetime-format-mail-perl/branches/upstream/current/t/sample_dates
URL: http://svn.debian.org/wsvn/pkg-perl/packages/libdatetime-format-mail-perl/branches/upstream/current/t/sample_dates?rev=5968&op=diff
==============================================================================
--- packages/libdatetime-format-mail-perl/branches/upstream/current/t/sample_dates (original)
+++ packages/libdatetime-format-mail-perl/branches/upstream/current/t/sample_dates Wed Jul 25 22:38:01 2007
@@ -10461,7 +10461,7 @@
Mon, 04 Nov 2002 13:39:51 +0000 (GMT)
Mon, 04 Nov 2002 16:58:50 +0000 (GMT)
Mon, 04 Nov 2002 17:07:41 +0000 (GMT)
-Mon 05 Mar 2001 04:30:10 +1100
+Mon 05 Mar 2001 04:30:10 +1100
Mon, 06 Jan 2003 06:04:48 -0000 (UTC)
Mon, 06 Jan 2003 08:52:49 +0000 (GMT)
Mon, 06 Jan 2003 18:44:28 +0000 (GMT)
More information about the Pkg-perl-cvs-commits
mailing list