r20399 - in /trunk/libregexp-common-time-perl: ./ debian/ lib/ t/
gregoa at users.alioth.debian.org
gregoa at users.alioth.debian.org
Sat May 24 23:14:42 UTC 2008
Author: gregoa
Date: Sat May 24 23:14:42 2008
New Revision: 20399
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=20399
Log:
New upstream release.
Added:
trunk/libregexp-common-time-perl/Build.PL
- copied unchanged from r20398, branches/upstream/libregexp-common-time-perl/current/Build.PL
trunk/libregexp-common-time-perl/MANIFEST.SKIP
- copied unchanged from r20398, branches/upstream/libregexp-common-time-perl/current/MANIFEST.SKIP
trunk/libregexp-common-time-perl/SIGNATURE
- copied unchanged from r20398, branches/upstream/libregexp-common-time-perl/current/SIGNATURE
trunk/libregexp-common-time-perl/lib/
- copied from r20398, branches/upstream/libregexp-common-time-perl/current/lib/
trunk/libregexp-common-time-perl/t/0-signature.t
- copied unchanged from r20398, branches/upstream/libregexp-common-time-perl/current/t/0-signature.t
trunk/libregexp-common-time-perl/t/1-load.t
- copied unchanged from r20398, branches/upstream/libregexp-common-time-perl/current/t/1-load.t
trunk/libregexp-common-time-perl/t/american.t
- copied unchanged from r20398, branches/upstream/libregexp-common-time-perl/current/t/american.t
trunk/libregexp-common-time-perl/t/mail-strict.t
- copied unchanged from r20398, branches/upstream/libregexp-common-time-perl/current/t/mail-strict.t
trunk/libregexp-common-time-perl/t/mail.t
- copied unchanged from r20398, branches/upstream/libregexp-common-time-perl/current/t/mail.t
Removed:
trunk/libregexp-common-time-perl/time.pm
Modified:
trunk/libregexp-common-time-perl/Changes
trunk/libregexp-common-time-perl/MANIFEST
trunk/libregexp-common-time-perl/META.yml
trunk/libregexp-common-time-perl/Makefile.PL
trunk/libregexp-common-time-perl/README
trunk/libregexp-common-time-perl/debian/changelog
trunk/libregexp-common-time-perl/t/dmy.t
trunk/libregexp-common-time-perl/t/hms.t
trunk/libregexp-common-time-perl/t/mdy.t
trunk/libregexp-common-time-perl/t/strftime.t
trunk/libregexp-common-time-perl/t/tf.t
Modified: trunk/libregexp-common-time-perl/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libregexp-common-time-perl/Changes?rev=20399&op=diff
==============================================================================
--- trunk/libregexp-common-time-perl/Changes (original)
+++ trunk/libregexp-common-time-perl/Changes Sat May 24 23:14:42 2008
@@ -1,4 +1,8 @@
-Revision history for Perl extension Regexp::Common::time
+Revision history for Perl extension Regexp::Common::time.
0.01 2005 December 4
- - First version
+ - First version
+
+0.02 23 May 2008
+ - Add mail, MAIL, and american formats.
+ - Fix many broken test cases.
Modified: trunk/libregexp-common-time-perl/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libregexp-common-time-perl/MANIFEST?rev=20399&op=diff
==============================================================================
--- trunk/libregexp-common-time-perl/MANIFEST (original)
+++ trunk/libregexp-common-time-perl/MANIFEST Sat May 24 23:14:42 2008
@@ -1,14 +1,23 @@
+Build.PL
Changes
Makefile.PL
MANIFEST
+MANIFEST.SKIP
README
-time.pm
+SIGNATURE
+lib/Regexp/Common/time.pm
+t/0-signature.t
+t/1-load.t
+t/american.t
t/dmy.t
t/doc.t
t/hms.t
+t/mail.t
+t/mail-strict.t
t/mdy.t
t/strftime.t
t/tf.t
t/ymd.t
t/zone.t
-META.yml Module meta-data (added by MakeMaker)
+META.yml
+SIGNATURE Added here by Module::Build
Modified: trunk/libregexp-common-time-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libregexp-common-time-perl/META.yml?rev=20399&op=diff
==============================================================================
--- trunk/libregexp-common-time-perl/META.yml (original)
+++ trunk/libregexp-common-time-perl/META.yml Sat May 24 23:14:42 2008
@@ -1,13 +1,20 @@
-# http://module-build.sourceforge.net/META-spec.html
-#XXXXXXX This is a prototype!!! It will change in the future!!! XXXXX#
-name: Regexp-Common-time
-version: 0.01
-version_from: time.pm
-installdirs: site
-requires:
- POSIX: 0
- Regexp::Common: 2.116
- Test::Simple: 0.40
-
-distribution_type: module
-generated_by: ExtUtils::MakeMaker version 6.17
+---
+name: Regexp-Common-time
+version: 0.02
+author:
+ - 'Eric J. Roode <eroode at barrack.com>'
+abstract: Date and time regexps.
+license: perl
+resources:
+ license: http://dev.perl.org/licenses/
+build_requires:
+ POSIX: 0
+ Test::More: 0.40
+provides:
+ Regexp::Common::time:
+ file: lib/Regexp/Common/time.pm
+ version: 0.02
+generated_by: Module::Build version 0.280801
+meta-spec:
+ url: http://module-build.sourceforge.net/META-spec-v1.2.html
+ version: 1.2
Modified: trunk/libregexp-common-time-perl/Makefile.PL
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libregexp-common-time-perl/Makefile.PL?rev=20399&op=diff
==============================================================================
--- trunk/libregexp-common-time-perl/Makefile.PL (original)
+++ trunk/libregexp-common-time-perl/Makefile.PL Sat May 24 23:14:42 2008
@@ -2,10 +2,14 @@
# See lib/ExtUtils/MakeMaker.pm for details of how to influence
# the contents of the Makefile that is written.
WriteMakefile(
- 'NAME' => 'Regexp::Common::time',
- 'VERSION_FROM' => 'time.pm', # finds $VERSION
- 'PREREQ_PM' => {'Regexp::Common' => '2.116', 'Test::Simple' => '0.40', POSIX => 0},
- ($] >= 5.005 ? ## Add these new keywords supported since 5.005
- (ABSTRACT_FROM => 'time.pm', # retrieve abstract from module
- AUTHOR => 'Eric Roode <roode at cpan.org>') : ()),
+ NAME => 'Regexp::Common::time',
+ VERSION_FROM => 'lib/Regexp/Common/time.pm', # finds $VERSION
+ PREREQ_PM =>
+ {
+ 'Test::More' => '0.40',
+ 'POSIX' => 0,
+ }
+ ($] >= 5.005 ? ## Add these new keywords supported since 5.005
+ (ABSTRACT_FROM => 'lib/Regexp/Common/time.pm', # retrieve abstract from module
+ AUTHOR => 'eroode <eroode at barrack.com>') : ()),
);
Modified: trunk/libregexp-common-time-perl/README
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libregexp-common-time-perl/README?rev=20399&op=diff
==============================================================================
--- trunk/libregexp-common-time-perl/README (original)
+++ trunk/libregexp-common-time-perl/README Sat May 24 23:14:42 2008
@@ -1,4 +1,4 @@
-Regexp::Common::time v0.01
+Regexp::Common::time v0.02
==========================
This is a Regexp::Common plugin that provides regular expressions for
@@ -25,24 +25,23 @@
or date pattern imaginable.
-DEVELOPMENT STATE
-
-This is a brand new module. It has a decent test suite, but it has
-not been extensively field-tested. So use it with caution.
-
-If you find any bugs, or if any behavior of Regexp::Common::time
-surprises you, I would be grateful if you could send me an email
-message about it. Thanks.
-
-
INSTALLATION
-To install this module, do the standard Perl module four-step:
+To install this module type the following:
- perl Makefile.PL or perl Makefile.pl LIB='my/install/path'
+ perl Build.PL
+ perl Build
+ perl Build test
+ perl Build install
+
+If you do not have Module::Build, you can use the older steps:
+
+ perl Makefile.PL
make
make test
make install
+
+On Windows, you will need to use nmake instead of make.
DEPENDENCIES
@@ -58,12 +57,22 @@
COPYRIGHT AND LICENSE
-Eric J. Roode, roode at cpan.org
+Copyright (c) 2005-2008 by Eric J. Roode, ROODE I<-at-> cpan I<-dot-> org
-Copyright (c) 2005 by Eric J. Roode. All Rights Reserved.
-This module is free software; you can redistribute it and/or modify it
-under the same terms as Perl itself.
+All rights reserved.
-To avoid my spam filter, please include "Perl", "module", or this
-module's name in the message's subject line, and/or GPG-sign your
-message.
+This module is copyrighted only to ensure proper attribution of
+authorship and to ensure that it remains available to all. This
+module is free, open-source software. This module may be freely used
+for any purpose, commercial, public, or private, provided that proper
+credit is given, and that no more-restrictive license is applied to
+derivative (not dependent) works.
+
+Substantial efforts have been made to ensure that this software meets
+high quality standards; however, no guarantee can be made that there
+are no undiscovered bugs, and no warranty is made as to suitability to
+any given use, including merchantability. Should this module cause
+your house to burn down, your dog to collapse, your heart-lung machine
+to fail, your spouse to desert you, or George Bush to be re-elected, I
+can offer only my sincere sympathy and apologies, and promise to
+endeavor to improve the software.
Modified: trunk/libregexp-common-time-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libregexp-common-time-perl/debian/changelog?rev=20399&op=diff
==============================================================================
--- trunk/libregexp-common-time-perl/debian/changelog (original)
+++ trunk/libregexp-common-time-perl/debian/changelog Sat May 24 23:14:42 2008
@@ -1,3 +1,9 @@
+libregexp-common-time-perl (0.02-1) UNRELEASED; urgency=low
+
+ * New upstream release.
+
+ -- gregor herrmann <gregoa at debian.org> Sun, 25 May 2008 01:12:05 +0200
+
libregexp-common-time-perl (0.01-1) unstable; urgency=low
* Initial Release (packaged by Ernesto Hernández-Novich) (Closes: #460140).
Modified: trunk/libregexp-common-time-perl/t/dmy.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libregexp-common-time-perl/t/dmy.t?rev=20399&op=diff
==============================================================================
--- trunk/libregexp-common-time-perl/t/dmy.t (original)
+++ trunk/libregexp-common-time-perl/t/dmy.t Sat May 24 23:14:42 2008
@@ -21,7 +21,7 @@
($Jan, $Feb, $Mar, $Apr, $May, $Jun, $Jul, $Aug, $Sep, $Oct, $Nov, $Dec)
= qw(Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec);
($January, $February, $March, $April, $MayFull, $June, $July, $August, $September, $October, $November, $December)
- = qw(January February March April MayFull June July August September October November December);
+ = qw(January February March April May June July August September October November December);
}
@match = (
@@ -416,7 +416,7 @@
[ "1 $February 2005", "dmy", [], 1, [ "1 $February 2005", '1', $February , 2005]],
[ "2 $March 2005", "dmy", [], 1, [ "2 $March 2005", '2', $March , 2005]],
["09 $April 2005", "dmy", [], 1, ["09 $April 2005", '09', $April , 2005]],
- [ "9 $MayFull 2005", "dmy", [], 1, [ "9 $MayFull 2005", '9', $MayFull , 2005]],
+ [ "9 $MayFull 2005", "dmy", [], 1, [ "9 $MayFull 2005", '9', $MayFull , 2005]],
["10 $June 2005", "dmy", [], 1, ["10 $June 2005", '10', $June , 2005]],
["11 $July 2005", "dmy", [], 1, ["11 $July 2005", '11', $July , 2005]],
["19 $August 2005", "dmy", [], 1, ["19 $August 2005", '19', $August , 2005]],
Modified: trunk/libregexp-common-time-perl/t/hms.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libregexp-common-time-perl/t/hms.t?rev=20399&op=diff
==============================================================================
--- trunk/libregexp-common-time-perl/t/hms.t (original)
+++ trunk/libregexp-common-time-perl/t/hms.t Sat May 24 23:14:42 2008
@@ -6,6 +6,7 @@
# hms tests.
# Base case
['10:23:45am', 'hms', [], 1, [qw(10:23:45am 10 23 45 am)]],
+
# am/pm variations
['10:23:45a', 'hms', [], 1, [q(10:23:45a), qw(10 23 45 a)]],
['10:23:45am', 'hms', [], 1, [q(10:23:45am), qw(10 23 45 am)]],
Modified: trunk/libregexp-common-time-perl/t/mdy.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libregexp-common-time-perl/t/mdy.t?rev=20399&op=diff
==============================================================================
--- trunk/libregexp-common-time-perl/t/mdy.t (original)
+++ trunk/libregexp-common-time-perl/t/mdy.t Sat May 24 23:14:42 2008
@@ -21,7 +21,7 @@
($Jan, $Feb, $Mar, $Apr, $May, $Jun, $Jul, $Aug, $Sep, $Oct, $Nov, $Dec)
= qw(Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec);
($January, $February, $March, $April, $MayFull, $June, $July, $August, $September, $October, $November, $December)
- = qw(January February March April MayFull June July August September October November December);
+ = qw(January February March April May June July August September October November December);
}
@match = (
Modified: trunk/libregexp-common-time-perl/t/strftime.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libregexp-common-time-perl/t/strftime.t?rev=20399&op=diff
==============================================================================
--- trunk/libregexp-common-time-perl/t/strftime.t (original)
+++ trunk/libregexp-common-time-perl/t/strftime.t Sat May 24 23:14:42 2008
@@ -5,6 +5,13 @@
BEGIN
{
# Man, this locale stuff is a pain. Why can't everyone just speak English?! ;-)
+
+ # Set defaults:
+ @MONTH = qw(January February March April May June July August September October November December);
+ @MON = qw(Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec);
+ @WEEKDAY = qw(Sunday Monday Tuesday Wednesday Thursday Friday Saturday);
+ @DAY = qw(Sun Mon Tue Wed Thu Fri Sat);
+
eval
{
require POSIX;
@@ -14,37 +21,21 @@
{
@MONTH = map I18N::Langinfo::langinfo($_), I18N::Langinfo::MON_1(), I18N::Langinfo::MON_2(), I18N::Langinfo::MON_3(), I18N::Langinfo::MON_4(), I18N::Langinfo::MON_5(), I18N::Langinfo::MON_6(), I18N::Langinfo::MON_7(), I18N::Langinfo::MON_8(), I18N::Langinfo::MON_9(), I18N::Langinfo::MON_10(), I18N::Langinfo::MON_11(), I18N::Langinfo::MON_12();
};
- if ($@)
- {
- @MONTH = qw(January February March April May June July August September October November December);
- }
eval
{
@MON = map I18N::Langinfo::langinfo($_), I18N::Langinfo::ABMON_1(), I18N::Langinfo::ABMON_2(), I18N::Langinfo::ABMON_3(), I18N::Langinfo::ABMON_4(), I18N::Langinfo::ABMON_5(), I18N::Langinfo::ABMON_6(), I18N::Langinfo::ABMON_7(), I18N::Langinfo::ABMON_8(), I18N::Langinfo::ABMON_9(), I18N::Langinfo::ABMON_10(), I18N::Langinfo::ABMON_11(), I18N::Langinfo::ABMON_12();
};
- if ($@)
- {
- @MON = qw(Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec);
- }
eval
{
@WEEKDAY = map I18N::Langinfo::langinfo($_), I18N::Langinfo::DAY_1(), I18N::Langinfo::DAY_2(), I18N::Langinfo::DAY_3(), I18N::Langinfo::DAY_4(), I18N::Langinfo::DAY_5(), I18N::Langinfo::DAY_6(), I18N::Langinfo::DAY_7();
};
- if ($@)
- {
- @WEEKDAY = qw(Sunday Monday Tuesday Wednesday Thursday Friday Saturday);
- }
eval
{
@DAY = map I18N::Langinfo::langinfo($_), I18N::Langinfo::ABDAY_1(), I18N::Langinfo::ABDAY_2(), I18N::Langinfo::ABDAY_3(), I18N::Langinfo::ABDAY_4(), I18N::Langinfo::ABDAY_5(), I18N::Langinfo::ABDAY_6(), I18N::Langinfo::ABDAY_7();
};
- if ($@)
- {
- @DAY = qw(Sun Mon Tue Wed Thu Fri Sat);
- }
};
# target, pattern, values, name
Modified: trunk/libregexp-common-time-perl/t/tf.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libregexp-common-time-perl/t/tf.t?rev=20399&op=diff
==============================================================================
--- trunk/libregexp-common-time-perl/t/tf.t (original)
+++ trunk/libregexp-common-time-perl/t/tf.t Sat May 24 23:14:42 2008
@@ -5,6 +5,12 @@
BEGIN
{
# Man, this locale stuff is a pain. Why can't everyone just speak English?!
+
+ # First set defaults:
+ @MONTH = qw(January February March April May June July August September October November December);
+ @MON = qw(Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec);
+ @WEEKDAY = qw(Sunday Monday Tuesday Wednesday Thursday Friday Saturday);
+ @DAY = qw(Sun Mon Tue Wed Thu Fri Sat);
eval
{
require POSIX;
@@ -14,37 +20,21 @@
{
@MONTH = map I18N::Langinfo::langinfo($_), I18N::Langinfo::MON_1(), I18N::Langinfo::MON_2(), I18N::Langinfo::MON_3(), I18N::Langinfo::MON_4(), I18N::Langinfo::MON_5(), I18N::Langinfo::MON_6(), I18N::Langinfo::MON_7(), I18N::Langinfo::MON_8(), I18N::Langinfo::MON_9(), I18N::Langinfo::MON_10(), I18N::Langinfo::MON_11(), I18N::Langinfo::MON_12();
};
- if ($@)
- {
- @MONTH = qw(January February March April May June July August September October November December);
- }
eval
{
@MON = map I18N::Langinfo::langinfo($_), I18N::Langinfo::ABMON_1(), I18N::Langinfo::ABMON_2(), I18N::Langinfo::ABMON_3(), I18N::Langinfo::ABMON_4(), I18N::Langinfo::ABMON_5(), I18N::Langinfo::ABMON_6(), I18N::Langinfo::ABMON_7(), I18N::Langinfo::ABMON_8(), I18N::Langinfo::ABMON_9(), I18N::Langinfo::ABMON_10(), I18N::Langinfo::ABMON_11(), I18N::Langinfo::ABMON_12();
};
- if ($@)
- {
- @MON = qw(Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec);
- }
eval
{
@WEEKDAY = map I18N::Langinfo::langinfo($_), I18N::Langinfo::DAY_1(), I18N::Langinfo::DAY_2(), I18N::Langinfo::DAY_3(), I18N::Langinfo::DAY_4(), I18N::Langinfo::DAY_5(), I18N::Langinfo::DAY_6(), I18N::Langinfo::DAY_7();
};
- if ($@)
- {
- @WEEKDAY = qw(Sunday Monday Tuesday Wednesday Thursday Friday Saturday);
- }
eval
{
@DAY = map I18N::Langinfo::langinfo($_), I18N::Langinfo::ABDAY_1(), I18N::Langinfo::ABDAY_2(), I18N::Langinfo::ABDAY_3(), I18N::Langinfo::ABDAY_4(), I18N::Langinfo::ABDAY_5(), I18N::Langinfo::ABDAY_6(), I18N::Langinfo::ABDAY_7();
};
- if ($@)
- {
- @DAY = qw(Sun Mon Tue Wed Thu Fri Sat);
- }
};
# target, pattern, values, name
More information about the Pkg-perl-cvs-commits
mailing list