r63306 - in /branches/upstream/libdatetime-format-natural-perl/current: Build.PL Changes META.yml Makefile.PL lib/DateTime/Format/Natural.pm scripts/dateparse

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

Author: angelabad-guest
Date: Mon Oct  4 14:50:21 2010
New Revision: 63306

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=63306
Log:
[svn-upgrade] new version libdatetime-format-natural-perl (0.90)

Modified:
    branches/upstream/libdatetime-format-natural-perl/current/Build.PL
    branches/upstream/libdatetime-format-natural-perl/current/Changes
    branches/upstream/libdatetime-format-natural-perl/current/META.yml
    branches/upstream/libdatetime-format-natural-perl/current/Makefile.PL
    branches/upstream/libdatetime-format-natural-perl/current/lib/DateTime/Format/Natural.pm
    branches/upstream/libdatetime-format-natural-perl/current/scripts/dateparse

Modified: branches/upstream/libdatetime-format-natural-perl/current/Build.PL
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdatetime-format-natural-perl/current/Build.PL?rev=63306&op=diff
==============================================================================
--- branches/upstream/libdatetime-format-natural-perl/current/Build.PL (original)
+++ branches/upstream/libdatetime-format-natural-perl/current/Build.PL Mon Oct  4 14:50:21 2010
@@ -15,6 +15,7 @@
                  'Carp' => 0,
                  'DateTime' => 0,
                  'Exporter' => 0,
+                 'Getopt::Long' => 0,
                  'List::MoreUtils' => 0,
                  'Params::Validate' => 0,
                  'Scalar::Util' => 0,

Modified: branches/upstream/libdatetime-format-natural-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdatetime-format-natural-perl/current/Changes?rev=63306&op=diff
==============================================================================
--- branches/upstream/libdatetime-format-natural-perl/current/Changes (original)
+++ branches/upstream/libdatetime-format-natural-perl/current/Changes Mon Oct  4 14:50:21 2010
@@ -1,4 +1,20 @@
 Revision history for Perl extension DateTime::Format::Natural.
+
+0.90  2010-10-04  <schubiger at cpan.org>
+
+ - Merged development version to stable.
+
+0.89_02  2010-09-29  <schubiger at cpan.org>
+
+ - Create the metadata package name string through joining it.
+
+ - Provide a generated list of values to _Day_of_Week().
+
+0.89_01  2010-09-21  <schubiger at cpan.org>
+
+ - Reword dateparse's help screen to be more descriptive.
+
+ - List Getopt::Long as prerequisite.
 
 0.89  2010-08-05  <schubiger at cpan.org>
 

Modified: branches/upstream/libdatetime-format-natural-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdatetime-format-natural-perl/current/META.yml?rev=63306&op=diff
==============================================================================
--- branches/upstream/libdatetime-format-natural-perl/current/META.yml (original)
+++ branches/upstream/libdatetime-format-natural-perl/current/META.yml Mon Oct  4 14:50:21 2010
@@ -1,6 +1,6 @@
 ---
 name: DateTime-Format-Natural
-version: 0.89
+version: 0.90
 author:
   - 'Steven Schubiger <schubiger at cpan.org>'
 abstract: Create machine readable date/time with natural parsing logic
@@ -14,6 +14,7 @@
   Carp: 0
   DateTime: 0
   Exporter: 0
+  Getopt::Long: 0
   List::MoreUtils: 0
   Params::Validate: 0
   Scalar::Util: 0
@@ -29,7 +30,7 @@
 provides:
   DateTime::Format::Natural:
     file: lib/DateTime/Format/Natural.pm
-    version: 0.89
+    version: 0.90
   DateTime::Format::Natural::Aliases:
     file: lib/DateTime/Format/Natural/Aliases.pm
     version: 0.03

Modified: branches/upstream/libdatetime-format-natural-perl/current/Makefile.PL
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdatetime-format-natural-perl/current/Makefile.PL?rev=63306&op=diff
==============================================================================
--- branches/upstream/libdatetime-format-natural-perl/current/Makefile.PL (original)
+++ branches/upstream/libdatetime-format-natural-perl/current/Makefile.PL Mon Oct  4 14:50:21 2010
@@ -11,6 +11,7 @@
           'VERSION_FROM' => 'lib/DateTime/Format/Natural.pm',
           'PREREQ_PM' => {
                            'Scalar::Util' => 0,
+                           'Getopt::Long' => 0,
                            'DateTime' => 0,
                            'Test::MockTime' => 0,
                            'Storable' => 0,

Modified: branches/upstream/libdatetime-format-natural-perl/current/lib/DateTime/Format/Natural.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdatetime-format-natural-perl/current/lib/DateTime/Format/Natural.pm?rev=63306&op=diff
==============================================================================
--- branches/upstream/libdatetime-format-natural-perl/current/lib/DateTime/Format/Natural.pm (original)
+++ branches/upstream/libdatetime-format-natural-perl/current/lib/DateTime/Format/Natural.pm Mon Oct  4 14:50:21 2010
@@ -18,7 +18,7 @@
 use Scalar::Util qw(blessed);
 use Storable qw(dclone);
 
-our $VERSION = '0.89';
+our $VERSION = '0.90';
 
 validation_options(
     on_fail => sub
@@ -63,7 +63,7 @@
     }
     $self->{Daytime} = $opts{daytime} || {};
 
-    my $mod = __PACKAGE__.'::Lang::'.uc($self->{Lang});
+    my $mod = join '::', (__PACKAGE__, 'Lang', uc $self->{Lang});
     eval "require $mod"; die $@ if $@;
 
     $self->{data} = $mod->__new();
@@ -448,7 +448,7 @@
     }
     elsif ($token_contains->('weekdays_all')
         && (exists $self->{modified}{day} && $self->{modified}{day} == 1)
-        && ($self->_Day_of_Week($self->{datetime}->year, $self->{datetime}->month, $self->{datetime}->day)
+        && ($self->_Day_of_Week(map $self->{datetime}->$_, qw(year month day))
          < DateTime->now(time_zone => $self->{Time_zone})->wday)
     ) {
         $self->{postprocess}{day} = 7;

Modified: branches/upstream/libdatetime-format-natural-perl/current/scripts/dateparse
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libdatetime-format-natural-perl/current/scripts/dateparse?rev=63306&op=diff
==============================================================================
--- branches/upstream/libdatetime-format-natural-perl/current/scripts/dateparse (original)
+++ branches/upstream/libdatetime-format-natural-perl/current/scripts/dateparse Mon Oct  4 14:50:21 2010
@@ -113,7 +113,7 @@
 Commands
  ?, help                this help screen
  exit, q, quit          leave dateparse
- everything else        datetime string
+ everything else        input string
 
 EOT
             next;