r72580 - in /trunk/libdatetime-set-perl: Changes MANIFEST META.yml debian/changelog lib/DateTime/Set.pm lib/DateTime/Span.pm lib/DateTime/SpanSet.pm t/01sanity.t t/21from_recurrence.t
periapt-guest at users.alioth.debian.org
periapt-guest at users.alioth.debian.org
Wed Apr 13 16:21:57 UTC 2011
Author: periapt-guest
Date: Wed Apr 13 16:21:36 2011
New Revision: 72580
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=72580
Log:
New upstream release
Added:
trunk/libdatetime-set-perl/t/21from_recurrence.t
- copied unchanged from r72579, branches/upstream/libdatetime-set-perl/current/t/21from_recurrence.t
Modified:
trunk/libdatetime-set-perl/Changes
trunk/libdatetime-set-perl/MANIFEST
trunk/libdatetime-set-perl/META.yml
trunk/libdatetime-set-perl/debian/changelog
trunk/libdatetime-set-perl/lib/DateTime/Set.pm
trunk/libdatetime-set-perl/lib/DateTime/Span.pm
trunk/libdatetime-set-perl/lib/DateTime/SpanSet.pm
trunk/libdatetime-set-perl/t/01sanity.t
Modified: trunk/libdatetime-set-perl/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdatetime-set-perl/Changes?rev=72580&op=diff
==============================================================================
--- trunk/libdatetime-set-perl/Changes (original)
+++ trunk/libdatetime-set-perl/Changes Wed Apr 13 16:21:36 2011
@@ -1,4 +1,11 @@
Changes for DateTime::Set
+
+0.30 2011-04-11
+- new test file t/21from_recurrence.t
+ Contributed by Olivier Mengue
+
+0.29 2011-04-01
+- new method is_empty_set - bug #50750
0.28 2009-07-19
- optimized DateTime::Set->as_list().
Modified: trunk/libdatetime-set-perl/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdatetime-set-perl/MANIFEST?rev=72580&op=diff
==============================================================================
--- trunk/libdatetime-set-perl/MANIFEST (original)
+++ trunk/libdatetime-set-perl/MANIFEST Wed Apr 13 16:21:36 2011
@@ -27,6 +27,7 @@
t/18as_list_empty.t
t/19spanset_daylight_savings.t
t/20spanset_week_wrapped_recurrence.t
+t/21from_recurrence.t
lib/DateTime/Set.pm
lib/DateTime/Span.pm
lib/DateTime/SpanSet.pm
Modified: trunk/libdatetime-set-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdatetime-set-perl/META.yml?rev=72580&op=diff
==============================================================================
--- trunk/libdatetime-set-perl/META.yml (original)
+++ trunk/libdatetime-set-perl/META.yml Wed Apr 13 16:21:36 2011
@@ -1,16 +1,24 @@
--- #YAML:1.0
-name: DateTime-Set
-version: 0.28
-abstract: DateTime set objects
-license: ~
-author:
+name: DateTime-Set
+version: 0.30
+abstract: DateTime set objects
+author:
- Flavio S. Glock <fglock at pucrs.br>
-generated_by: ExtUtils::MakeMaker version 6.44
-distribution_type: module
-requires:
- DateTime: 0.12
- Set::Infinite: 0.59
- Test::More: 0
+license: unknown
+distribution_type: module
+configure_requires:
+ ExtUtils::MakeMaker: 0
+build_requires:
+ ExtUtils::MakeMaker: 0
+requires:
+ DateTime: 0.12
+ Set::Infinite: 0.59
+ Test::More: 0
+no_index:
+ directory:
+ - t
+ - inc
+generated_by: ExtUtils::MakeMaker version 6.56
meta-spec:
- url: http://module-build.sourceforge.net/META-spec-v1.3.html
- version: 1.3
+ url: http://module-build.sourceforge.net/META-spec-v1.4.html
+ version: 1.4
Modified: trunk/libdatetime-set-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdatetime-set-perl/debian/changelog?rev=72580&op=diff
==============================================================================
--- trunk/libdatetime-set-perl/debian/changelog (original)
+++ trunk/libdatetime-set-perl/debian/changelog Wed Apr 13 16:21:36 2011
@@ -1,4 +1,4 @@
-libdatetime-set-perl (0.28-2) UNRELEASED; urgency=low
+libdatetime-set-perl (0.30-1) UNRELEASED; urgency=low
[ Ansgar Burchardt ]
* Remove build-dep on libdatetime-event-recurrence-perl again to avoid a
@@ -7,8 +7,9 @@
[ Nicholas Bamber ]
* Added myself to Uploaders
+ * New upstream release
- -- Ansgar Burchardt <ansgar at 43-1.org> Sat, 29 May 2010 00:17:14 +0900
+ -- Nicholas Bamber <nicholas at periapt.co.uk> Wed, 13 Apr 2011 17:24:17 +0100
libdatetime-set-perl (0.28-1) unstable; urgency=low
Modified: trunk/libdatetime-set-perl/lib/DateTime/Set.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdatetime-set-perl/lib/DateTime/Set.pm?rev=72580&op=diff
==============================================================================
--- trunk/libdatetime-set-perl/lib/DateTime/Set.pm (original)
+++ trunk/libdatetime-set-perl/lib/DateTime/Set.pm Wed Apr 13 16:21:36 2011
@@ -16,7 +16,7 @@
use constant NEG_INFINITY => -1 * (100 ** 100 ** 100);
BEGIN {
- $VERSION = '0.28';
+ $VERSION = '0.30';
}
@@ -298,6 +298,11 @@
return bless { set => Set::Infinite::_recurrence->new }, $class;
}
+sub is_empty_set {
+ my $set = $_[0];
+ $set->{set}->is_null;
+}
+
sub clone {
my $self = bless { %{ $_[0] } }, ref $_[0];
$self->{set} = $_[0]->{set}->copy;
@@ -844,6 +849,12 @@
$set = DateTime::Set->empty_set;
print "empty set" unless defined $set->max;
+=item * is_empty_set
+
+Returns true is the set is empty; false otherwise.
+
+ print "nothing" if $set->is_empty_set;
+
=item * clone
This object method returns a replica of the given object.
Modified: trunk/libdatetime-set-perl/lib/DateTime/Span.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdatetime-set-perl/lib/DateTime/Span.pm?rev=72580&op=diff
==============================================================================
--- trunk/libdatetime-set-perl/lib/DateTime/Span.pm (original)
+++ trunk/libdatetime-set-perl/lib/DateTime/Span.pm Wed Apr 13 16:21:36 2011
@@ -150,6 +150,11 @@
return $class->from_datetimes(%args);
}
+sub is_empty_set {
+ my $set = $_[0];
+ $set->{set}->is_null;
+}
+
sub clone {
bless {
set => $_[0]->{set}->copy,
Modified: trunk/libdatetime-set-perl/lib/DateTime/SpanSet.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdatetime-set-perl/lib/DateTime/SpanSet.pm?rev=72580&op=diff
==============================================================================
--- trunk/libdatetime-set-perl/lib/DateTime/SpanSet.pm (original)
+++ trunk/libdatetime-set-perl/lib/DateTime/SpanSet.pm Wed Apr 13 16:21:36 2011
@@ -198,6 +198,11 @@
return bless { set => Set::Infinite::_recurrence->new }, $class;
}
+sub is_empty_set {
+ my $set = $_[0];
+ $set->{set}->is_null;
+}
+
sub clone {
bless {
set => $_[0]->{set}->copy,
@@ -619,6 +624,12 @@
Creates a new empty set.
+=item * is_empty_set
+
+Returns true is the set is empty; false otherwise.
+
+ print "nothing" if $set->is_empty_set;
+
=item * clone
This object method returns a replica of the given object.
Modified: trunk/libdatetime-set-perl/t/01sanity.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdatetime-set-perl/t/01sanity.t?rev=72580&op=diff
==============================================================================
--- trunk/libdatetime-set-perl/t/01sanity.t (original)
+++ trunk/libdatetime-set-perl/t/01sanity.t Wed Apr 13 16:21:36 2011
@@ -3,7 +3,7 @@
use strict;
use Test::More;
-plan tests => 7;
+plan tests => 9;
use DateTime;
use DateTime::Set;
@@ -29,12 +29,15 @@
ok( $s1->max->ymd eq '1900-11-22',
'got 1900-11-22 - max' );
+is( $s1->is_empty_set, 0, 'non-empty set is not empty' );
+
eval { DateTime::Set->from_datetimes() };
ok( $@, 'Cannot call from_datetimes without dates parameter' );
my $empty = DateTime::Set->empty_set;
is( $empty->min, undef, 'empty set ->min should be undef' );
is( $empty->max, undef, 'empty set ->max should be undef' );
+is( $empty->is_empty_set, 1, 'empty set is empty' );
1;
More information about the Pkg-perl-cvs-commits
mailing list