r45943 - in /branches/upstream/librose-datetime-perl/current: Changes META.yml Makefile.PL lib/Rose/DateTime.pm lib/Rose/DateTime/Parser.pm lib/Rose/DateTime/Util.pm
jawnsy-guest at users.alioth.debian.org
jawnsy-guest at users.alioth.debian.org
Sat Oct 17 17:05:54 UTC 2009
Author: jawnsy-guest
Date: Sat Oct 17 17:05:48 2009
New Revision: 45943
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=45943
Log:
[svn-upgrade] Integrating new upstream version, librose-datetime-perl (0.533)
Modified:
branches/upstream/librose-datetime-perl/current/Changes
branches/upstream/librose-datetime-perl/current/META.yml
branches/upstream/librose-datetime-perl/current/Makefile.PL
branches/upstream/librose-datetime-perl/current/lib/Rose/DateTime.pm
branches/upstream/librose-datetime-perl/current/lib/Rose/DateTime/Parser.pm
branches/upstream/librose-datetime-perl/current/lib/Rose/DateTime/Util.pm
Modified: branches/upstream/librose-datetime-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/librose-datetime-perl/current/Changes?rev=45943&op=diff
==============================================================================
--- branches/upstream/librose-datetime-perl/current/Changes (original)
+++ branches/upstream/librose-datetime-perl/current/Changes Sat Oct 17 17:05:48 2009
@@ -1,85 +1,89 @@
-0.532 (10.23.2006) - John Siracusa <siracusa at mindspring.com>
+0.533 (10.16.2009) - John Siracusa <siracusa at gmail.com>
+
+ * Updated eval blocks to avoid stomping on $@ from an outer scope.
+
+0.532 (10.23.2006) - John Siracusa <siracusa at gmail.com>
* Made compatible with DateTime 0.35 and DateTime::Locale 0.31.
(Patch by Lucian Dragus)
-0.531 (10.06.2006) - John Siracusa <siracusa at mindspring.com>
+0.531 (10.06.2006) - John Siracusa <siracusa at gmail.com>
* parse_date() now accepts "now!" as an alias for "now".
* Fixed a typo in the documentation.
-0.53 (06.07.2006) - John Siracusa <siracusa at mindspring.com>
+0.53 (06.07.2006) - John Siracusa <siracusa at gmail.com>
* parse_date() now accepts epoch values in the full range, not
just 9 or 10 digit numbers.
* Added parse_epoch() function to resolve the now-ambiguous parse_date()
behavior with respect to epochs and YYYYMMDD values.
-0.522 (04.08.2006) - John Siracusa <siracusa at mindspring.com>
+0.522 (04.08.2006) - John Siracusa <siracusa at gmail.com>
* Updated the test suite to account for systems that can't handle
negative epoch values. (Thanks to Michael Lackhoff)
-0.521 (04.05.2006) - John Siracusa <siracusa at mindspring.com>
+0.521 (04.05.2006) - John Siracusa <siracusa at gmail.com>
* Removed stray "._*" files from module distribution.
-0.52 (04.04.2006) - John Siracusa <siracusa at mindspring.com>
+0.52 (04.04.2006) - John Siracusa <siracusa at gmail.com>
* Allow negative and fractional epoch values in parse_date().
* Fixed a bug in the yyyy-mm-dd date parsing that caused it to
incorrectly match 10-digit seconds-since-epoch values.
(Reported by Peter Karman)
-0.51 (03.16.2006) - John Siracusa <siracusa at mindspring.com>
+0.51 (03.16.2006) - John Siracusa <siracusa at gmail.com>
* The european_dates() setting is now initialized as appropriate for
the current locale, discovered via to DateTime->DefaultLocale().
(Suggested by Michael Lackhoff)
-0.50 (03.07.2006) - John Siracusa <siracusa at mindspring.com>
+0.50 (03.07.2006) - John Siracusa <siracusa at gmail.com>
* Added support for Euorpean-style (dd/mm/yyyy) dates.
* Big version number bump to reflect progress towards 1.0.
-0.0134 (08.22.2005) - John Siracusa <siracusa at mindspring.com>
+0.0134 (08.22.2005) - John Siracusa <siracusa at gmail.com>
* Fixed incorrect version number in one file.
-0.0133 (08.20.2005) - John Siracusa <siracusa at mindspring.com>
+0.0133 (08.20.2005) - John Siracusa <siracusa at gmail.com>
* POD fixes.
-0.0131 (03.10.2005) - John Siracusa <siracusa at mindspring.com>
+0.0131 (03.10.2005) - John Siracusa <siracusa at gmail.com>
* Fixed POD errors in Rose::DateTime::Util.
-0.013 (02.26.2005) - John Siracusa <siracusa at mindspring.com>
+0.013 (02.26.2005) - John Siracusa <siracusa at gmail.com>
* Changed default time zone from 'local' to 'floating' in
Rose::DateTime::Util in order to avoid unnecessary overhead
when setting the time zone explicitly.
-0.0122 (12.14.2004) - John Siracusa <siracusa at mindspring.com>
+0.0122 (12.14.2004) - John Siracusa <siracusa at gmail.com>
* Ho hum, another day, another release. Documentation patch
again to fix more typos and further clarify local time zone
shenanigans.
-0.0121 (12.13.2004) - John Siracusa <siracusa at mindspring.com>
+0.0121 (12.13.2004) - John Siracusa <siracusa at gmail.com>
* Documentation patch to fix typos and clarify local time zone
shenanigans.
-0.012 (12.08.2004) - John Siracusa <siracusa at mindspring.com>
+0.012 (12.08.2004) - John Siracusa <siracusa at gmail.com>
* Fix attempt to fail gracefully when the local time zone cannot
be determined.
-0.011 (11.14.2004) - John Siracusa <siracusa at mindspring.com>
+0.011 (11.14.2004) - John Siracusa <siracusa at gmail.com>
* Added copyright info. Version 0.01 removed.
-0.01 (11.13.2004) - John Siracusa <siracusa at mindspring.com>
+0.01 (11.13.2004) - John Siracusa <siracusa at gmail.com>
* Initial release.
Modified: branches/upstream/librose-datetime-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/librose-datetime-perl/current/META.yml?rev=45943&op=diff
==============================================================================
--- branches/upstream/librose-datetime-perl/current/META.yml (original)
+++ branches/upstream/librose-datetime-perl/current/META.yml Sat Oct 17 17:05:48 2009
@@ -1,13 +1,22 @@
--- #YAML:1.0
-name: Rose-DateTime
-version: 0.532
-abstract: ~
-license: ~
-generated_by: ExtUtils::MakeMaker version 6.31
-distribution_type: module
-requires:
- DateTime: 0
- Rose::Object: 0.82
+name: Rose-DateTime
+version: 0.533
+abstract: ~
+author: []
+license: unknown
+distribution_type: module
+configure_requires:
+ ExtUtils::MakeMaker: 0
+build_requires:
+ ExtUtils::MakeMaker: 0
+requires:
+ DateTime: 0
+ Rose::Object: 0.82
+no_index:
+ directory:
+ - t
+ - inc
+generated_by: ExtUtils::MakeMaker version 6.54
meta-spec:
- url: http://module-build.sourceforge.net/META-spec-v1.2.html
- version: 1.2
+ url: http://module-build.sourceforge.net/META-spec-v1.4.html
+ version: 1.4
Modified: branches/upstream/librose-datetime-perl/current/Makefile.PL
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/librose-datetime-perl/current/Makefile.PL?rev=45943&op=diff
==============================================================================
--- branches/upstream/librose-datetime-perl/current/Makefile.PL (original)
+++ branches/upstream/librose-datetime-perl/current/Makefile.PL Sat Oct 17 17:05:48 2009
@@ -5,7 +5,8 @@
WriteMakefile(NAME => 'Rose::DateTime',
PMLIBDIRS => [ 'lib' ],
VERSION_FROM => 'lib/Rose/DateTime.pm',
- dist => { DIST_CP => 'cp' }, # Avoid Mac OS X ._* files
+ ($^O =~ /darwin/i ?
+ (dist => { DIST_CP => 'cp' }) : ()), # Avoid Mac OS X ._* files
PREREQ_PM =>
{
'DateTime' => 0,
Modified: branches/upstream/librose-datetime-perl/current/lib/Rose/DateTime.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/librose-datetime-perl/current/lib/Rose/DateTime.pm?rev=45943&op=diff
==============================================================================
--- branches/upstream/librose-datetime-perl/current/lib/Rose/DateTime.pm (original)
+++ branches/upstream/librose-datetime-perl/current/lib/Rose/DateTime.pm Sat Oct 17 17:05:48 2009
@@ -2,7 +2,7 @@
use strict; # ha
-our $VERSION = '0.532';
+our $VERSION = '0.533';
1;
@@ -45,8 +45,8 @@
=head1 AUTHOR
-John C. Siracusa (siracusa at mindspring.com)
+John C. Siracusa (siracusa at gmail.com)
-=head1 COPYRIGHT
+=head1 LICENSE
Copyright (c) 2004-2006 by John C. Siracusa. All rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
Modified: branches/upstream/librose-datetime-perl/current/lib/Rose/DateTime/Parser.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/librose-datetime-perl/current/lib/Rose/DateTime/Parser.pm?rev=45943&op=diff
==============================================================================
--- branches/upstream/librose-datetime-perl/current/lib/Rose/DateTime/Parser.pm (original)
+++ branches/upstream/librose-datetime-perl/current/lib/Rose/DateTime/Parser.pm Sat Oct 17 17:05:48 2009
@@ -143,8 +143,8 @@
=head1 AUTHOR
-John C. Siracusa (siracusa at mindspring.com)
+John C. Siracusa (siracusa at gmail.com)
-=head1 COPYRIGHT
+=head1 LICENSE
Copyright (c) 2004-2006 by John C. Siracusa. All rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
Modified: branches/upstream/librose-datetime-perl/current/lib/Rose/DateTime/Util.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/librose-datetime-perl/current/lib/Rose/DateTime/Util.pm?rev=45943&op=diff
==============================================================================
--- branches/upstream/librose-datetime-perl/current/lib/Rose/DateTime/Util.pm (original)
+++ branches/upstream/librose-datetime-perl/current/lib/Rose/DateTime/Util.pm Sat Oct 17 17:05:48 2009
@@ -18,7 +18,7 @@
all => \@EXPORT_OK
);
-our $VERSION = '0.532';
+our $VERSION = '0.533';
our $TZ = 'floating';
our $Debug = 0;
@@ -88,11 +88,18 @@
{
if(@_ > 1)
{
- eval { $arg->set_time_zone($time_zone) };
-
- if($@)
+ my $error;
+
+ TRY:
{
- $Error = $@;
+ local $@;
+ eval { $arg->set_time_zone($time_zone) };
+ $error = $@;
+ }
+
+ if($error)
+ {
+ $Error = $error;
return undef;
}
}
@@ -374,21 +381,30 @@
}
}
- eval
- {
- $date = DateTime->new(year => $year,
- month => $month,
- day => $mday,
- hour => $hours,
- minute => $mins,
- second => $secs,
- nanosecond => $fsecs,
- time_zone => $tz);
- };
-
- if($@)
- {
- $Error = $@;
+ my $error;
+
+ TRY:
+ {
+ local $@;
+
+ eval
+ {
+ $date = DateTime->new(year => $year,
+ month => $month,
+ day => $mday,
+ hour => $hours,
+ minute => $mins,
+ second => $secs,
+ nanosecond => $fsecs,
+ time_zone => $tz);
+ };
+
+ $error = $@;
+ }
+
+ if($error)
+ {
+ $Error = $error;
warn $Error if($Debug); # $ENV{'MOD_PERL'}
return;
}
@@ -788,8 +804,8 @@
=head1 AUTHOR
-John C. Siracusa (siracusa at mindspring.com)
-
-=head1 COPYRIGHT
+John C. Siracusa (siracusa at gmail.com)
+
+=head1 LICENSE
Copyright (c) 2004-2006 by John C. Siracusa. All rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
More information about the Pkg-perl-cvs-commits
mailing list