| version 1.15, 2010/01/26 05:47:30 |
version 1.16, 2010/01/26 06:03:11 |
|
|
| package Text::Todo::REST::API; |
package Text::Todo::REST::API; |
| |
|
| # $AFresh1: API.pm,v 1.14 2010/01/26 05:05:00 andrew Exp $ |
# $AFresh1: API.pm,v 1.15 2010/01/26 05:47:30 andrew Exp $ |
| |
|
| use warnings; |
use warnings; |
| use strict; |
use strict; |
|
|
| my $list = $self->_todo->file( $options{list} ); |
my $list = $self->_todo->file( $options{list} ); |
| |
|
| my $suffix = $self->_suffix || q{}; |
my $suffix = $self->_suffix || q{}; |
| if ($list !~ / \Q$suffix\E $/ixms) { |
if ( $list !~ / \Q$suffix\E $/ixms ) { |
| $list .= $suffix; |
$list .= $suffix; |
| } |
} |
| |
|
![[BACK]](/icons/cvsweb/back.gif){kind=icon}
Return to API.pm CVS log ![[TXT]](/icons/cvsweb/text.gif){kind=icon}
![[DIR]](/icons/cvsweb/dir.gif){kind=icon}
Up to [local] / todotxt / Text-Todo-REST-API / lib / Text / Todo / REST