Changeset 24618

Timestamp:

11/22/08 17:08:10 (5 years ago)

Author:

daisuke

Message:

s/DateTime::Infinite/DateTime::Lite::Infinite/g

Files:

• lang/perl/DateTime-Lite/trunk/lib/DateTime/Lite/Arithmetic.pm (modified) (2 diffs)

lang/perl/DateTime-Lite/trunk/lib/DateTime/Lite/Arithmetic.pm

@@ -327 +327 @@
         my %deltas = $dur->deltas;
 
-        # This bit isn't quite right since DateTime::Infinite::Future -
+        # This bit isn't quite right since DateTime::Lite::Infinite::Future -
         # infinite duration should NaN
         foreach my $val ( values %deltas )
@@ -334 +334 @@
             if ( $val == &DateTime::Lite::INFINITY )
             {
-                $inf = DateTime::Infinite::Future->new;
+                $inf = DateTime::Lite::Infinite::Future->new;
             }
             elsif ( $val == &DateTime::Lite::NEG_INFINITY )
             {
-                $inf = DateTime::Infinite::Past->new;
+                $inf = DateTime::Lite::Infinite::Past->new;
             }