todotxt/Text-Todo/lib/Text/Todo.pm - diff

Return to Todo.pm CVS log

Up to [local] / todotxt / Text-Todo / lib / Text

version 1.17, 2010/01/12 20:09:02

version 1.24, 2010/01/22 18:15:06

Line 1

package Text::Todo;

# $AFresh1: Todo.pm,v 1.16 2010/01/12 19:40:52 andrew Exp $

# $AFresh1: Todo.pm,v 1.23 2010/01/22 01:30:45 andrew Exp $

use warnings;

use strict;

Line 10

use Text::Todo::Entry;

use File::Spec;

use version; our $VERSION = qv('0.0.1');

use version; our $VERSION = qv('0.1.1');

{

my %path_of;

my @attr_refs = \(

my %list_of;

my %path_of,

my %loaded_of;

my %list_of,

my %loaded_of,

);

sub new {

my ( $class, $options ) = @_;

Line 382

Line 385

croak "Invalid entry [$entry]!";

}

sub DESTROY {

my ($self) = @_;

my $ident = ident $self;

foreach my $attr_ref (@attr_refs) {

delete $attr_ref->{$ident};

}

return;

}

1; # Magic true value required at end of module

Line 389

Line 403

=head1 NAME

Text::Todo - Perl interface to todo_txt files

Text::Todo - Perl interface to todotxt files

=head1 VERSION