package Template::Plugin::Time::Duration;
use strict;
our $VERSION = '0.02';
require Template::Plugin;
use base qw(Template::Plugin);
use Time::Duration qw();
sub ago { shift; return Time::Duration::ago(@_) };
sub ago_exact { shift; return Time::Duration::ago_exact(@_) };
sub concise { shift; return Time::Duration::concise(@_) };
sub duration { shift; return Time::Duration::duration(@_); }
sub duration_exact { shift; return Time::Duration::duration_exact(@_); }
sub from_now { shift; return Time::Duration::from_now(@_) };
sub from_now_exact { shift; return Time::Duration::from_now_exact(@_) };
sub later { shift; return Time::Duration::later(@_) };
sub later_exact { shift; return Time::Duration::later_exact(@_) };
sub earlier { shift; return Time::Duration::earlier(@_) };
sub earlier_exact { shift; return Time::Duration::earlier_exact(@_) };
1;
=head1 NAME
Template::Plugin::Time::Duration - Time::Duration functions for Template Toolkit
=head1 SYNOPSIS
[% USE time_dir = Time.Duration %]
This thing happened [% time_dir.ago(some_seconds) %].
=head1 DESCRIPTION
This plugin allows you to use functions from Time::Duration in your templates.
It is very simple and hopefully requires little explanation.
=head1 FUNCTIONS
=head2 ago
=head2 ago_exact
=head2 concise
=head2 duration
=head2 duration_exact
=head2 from_now
=head2 from_now_exact
=head2 later
=head2 later_exact
=head2 earlier
=head2 earlier_exact
=head1 SEE ALSO
L<Time::Duration>
=head1 AUTHOR
Cory G Watson, C<< <gphat at cpan.org> >>
=head1 COPYRIGHT & LICENSE
Copyright 2010 Cold Hard Code, LLC
This program is free software; you can redistribute it and/or modify it
under the terms of either: the GNU General Public License as published
by the Free Software Foundation; or the Artistic License.
See http://dev.perl.org/licenses/ for more information.
=cut