Changeset 22
- Timestamp:
- 02/05/06 11:27:22
- Files:
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
trunk/plagger/lib/Plagger/Date.pm
r12 r22 9 9 sub parse { 10 10 my($class, $format, $date) = @_; 11 my $module = "DateTime::Format::$format"; 12 $module->require or die $@; 11 12 my $module; 13 if (ref $format) { 14 $module = $format; 15 } else { 16 $module = "DateTime::Format::$format"; 17 $module->require or die $@; 18 } 19 13 20 my $dt = $module->parse_datetime($date); 14 15 21 if (my $context = Plagger->context) { 16 22 $dt->set_time_zone($context->conf->{timezone});
