Changeset 2051

Show
Ignore:
Timestamp:
10/26/06 02:48:36
Author:
miyagawa
Message:

fixed typo. Make it a subclass of DateTime?::Span

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved
  • DateTime-Span-Birth/trunk/lib/DateTime/Span/Birth.pm

    r2050 r2051  
    22 
    33use strict; 
     4use base qw( DateTime::Span ); 
    45our $VERSION = '0.01'; 
    56 
     
    2324    } 
    2425 
    25     return DateTime::Span->from_datetimes( start => $dates[0], end => $dates[1] ); 
     26    return $class->from_datetimes( start => $dates[0], end => $dates[1] ); 
    2627} 
    2728 
     
    4748__END__ 
    4849 
    49 =for stopwords SQL 
     50=for stopwords SQL datetime 
    5051 
    5152=head1 NAME 
     
    7071DateTime::Span::Birth is a port of Date::Range::Birth module and works 
    7172with DateTime::Span object. This module allows you to say "who is now 
    72 28 years old, based on thier bitrhday dates?" 
     7328 years old, based on their birthday dates?" 
    7374 
    7475This would be particularly useful when you build an SQL query to, say,