version 1.4, 2010/01/23 07:04:43 |
version 1.5, 2010/01/26 06:03:11 |
|
|
package Text::Todo::REST::API::Representations::md5; |
package Text::Todo::REST::API::Representations::md5; |
|
|
# $AFresh1: md5.pm,v 1.3 2010/01/19 03:20:14 andrew Exp $ |
# $AFresh1: md5.pm,v 1.4 2010/01/23 07:04:43 andrew Exp $ |
|
|
use base 'Text::Todo::REST::API::Representations'; |
use base 'Text::Todo::REST::API::Representations'; |
|
|
|
|
sub render_list { |
sub render_list { |
my ( $self, $format, $input ) = @_; |
my ( $self, $format, $input ) = @_; |
|
|
return if ! defined $input; |
return if !defined $input; |
|
|
my @input = $input; |
my @input = $input; |
if (ref $input eq 'ARRAY') { |
if ( ref $input eq 'ARRAY' ) { |
@input = @{ $input }; |
@input = @{$input}; |
} |
} |
|
|
my $output; |
my $output; |