version 1.1, 2010/01/19 03:18:34 |
version 1.2, 2010/01/23 07:04:43 |
|
|
package Text::Todo::REST::API::Representations; |
package Text::Todo::REST::API::Representations; |
|
|
# $AFresh1$ |
# $AFresh1: Representations.pm,v 1.1 2010/01/19 03:18:34 andrew Exp $ |
|
|
use warnings; |
use warnings; |
use strict; |
use strict; |
use Carp; |
use Carp; |
|
|
use Class::Std::Utils; |
use Class::Std::Utils; |
use Data::Dumper; |
|
|
|
use version; our $VERSION = qv('0.0.1'); |
use version; our $VERSION = qv('0.0.1'); |
|
|
|
|
{ |
{ |
my @attr_refs = \( |
my @attr_refs = \( |
my %todo_of, |
|
); |
); |
|
|
sub new { |
sub new { |
|
|
} |
} |
|
|
sub content_type { return } |
sub content_type { return } |
sub can_format { return } |
sub can_render { return } |
|
|
sub fail { |
sub _fail { |
my ( $self, @message ) = @_; |
my ( $self, @message ) = @_; |
croak(@message); |
croak(@message); |
} |
} |