[cgi-wiki-dev] DateTime error with Time-Piece-2.00_01

Michal Jurosz cgi-wiki-dev@earth.li
Tue, 24 Feb 2004 22:00:01 +0100


I get error:
Cannot compare a datetime to a regular scalar at
C:/Perl/site/lib/DateTime.pm line 1248.

CGI-Wiki-Kwiki-0.48, CGI-Wiki-0.50,
DateTime-0.20, Time-Piece-2.00_01

My fix, but I am not sure about this :

CGI::Wiki::Store::Database - Line 600
     } elsif ( $args{days} ) {
         my $now = localtime;
+        $now = $now->epoch if ref $now eq 'Time::Piece';
     	my $then = $now - ( ONE_DAY * $args{days} );

-- 
------------------------------
   S pozdravem Michal Jurosz
rootmj@seznam.cz ICQ#:93348414
     http://mjhome.zde.cz
------------------------------