version 1.1, 2010/01/31 04:24:55 |
version 1.2, 2010/01/31 04:31:34 |
|
|
package Text::Todo::REST::API::Representations::json; |
package Text::Todo::REST::API::Representations::json; |
|
|
# $AFresh1: text.pm,v 1.4 2010/01/26 06:03:11 andrew Exp $ |
# $AFresh1: json.pm,v 1.1 2010/01/31 04:24:55 andrew Exp $ |
|
|
use base 'Text::Todo::REST::API::Representations'; |
use base 'Text::Todo::REST::API::Representations'; |
|
|
|
|
use JSON; |
use JSON; |
|
|
{ |
{ |
sub content_type { return 'text/plain' } |
sub content_type { return 'application/json' } |
|
|
sub can_render { |
sub can_render { |
my ( $class, $format ) = @_; |
my ( $class, $format ) = @_; |