todotxt/Text-Todo-REST-API/lib/Text/Todo/REST/API/Representations/text.pm - diff

Return to text.pm CVS log

Up to [local] / todotxt / Text-Todo-REST-API / lib / Text / Todo / REST / API / Representations

version 1.6, 2010/02/13 22:24:15

version 1.7, 2010/02/16 04:10:38

Line 1

package Text::Todo::REST::API::Representations::text;

# $AFresh1: text.pm,v 1.5 2010/02/13 21:46:59 andrew Exp $

# $AFresh1: text.pm,v 1.6 2010/02/13 22:24:15 andrew Exp $

use base 'Text::Todo::REST::API::Representations';

Line 37

return $output;

}

sub render_files { _render(@_) }

sub render_tags { _render(@_) }

sub render_tags {

my ( $self, $format, $data ) = @_;

if (ref $data eq 'HASH') {

my $output = '';

foreach my $k (sort keys %{ $data }) {

$output .= $k . ': ' . $data->{$k} . "\n";

}

return $output;

}

return $self->_render($format, $data);

}

sub render_list {

my ( $self, $format, $input ) = @_;