[BACK]Return to Entry.pm CVS log [TXT][DIR] Up to [local] / todotxt / Text-Todo / lib / Text / Todo

Diff for /todotxt/Text-Todo/lib/Text/Todo/Entry.pm between version 1.25 and 1.27

version 1.25, 2010/01/20 21:53:01 version 1.27, 2010/02/13 23:06:34
Line 1 
Line 1 
 package Text::Todo::Entry;  package Text::Todo::Entry;
   
 # $AFresh1: Entry.pm,v 1.24 2010/01/19 18:53:36 andrew Exp $  # $AFresh1: Entry.pm,v 1.26 2010/01/22 01:30:45 andrew Exp $
   
 use warnings;  use warnings;
 use strict;  use strict;
Line 8 
Line 8 
   
 use Class::Std::Utils;  use Class::Std::Utils;
   
 use version; our $VERSION = qv('0.1.0');  use version; our $VERSION = qv('0.1.1');
   
 {  {
   
Line 123 
Line 123 
         return;          return;
     }      }
   
       sub known_tags {
           my ( $self ) = @_;
           return $known_tags_of{ ident($self) };
       }
   
     sub _tags {      sub _tags {
         my ( $self, $tag ) = @_;          my ( $self, $tag ) = @_;
         my $ident = ident($self);          my $ident = ident($self);
Line 219 
Line 224 
   
     sub done {      sub done {
         my ($self) = @_;          my ($self) = @_;
         my $ident = ident($self);          return $completion_status_of{ ident($self) };
   
         return $completion_status_of{$ident};  
     }      }
   
     sub DESTROY {      sub DESTROY {
Line 317 
Line 320 
   
 Each tag type generates two accessor functions {tag}s and in_{tag}.  Each tag type generates two accessor functions {tag}s and in_{tag}.
   
 Current tags are context (@) and project (+).  Default tags are context (@) and project (+).
   
 When creating a new object you can pass in new tags to recognize.  When creating a new object you can pass in new tags to recognize.
   
Line 328 
Line 331 
   
     my @due_dates = $entry->due_dates;      my @due_dates = $entry->due_dates;
   
 then @due_dates eq ( '2011-01-01' );  then @due_dates is ( '2011-01-01' );
   
 and you could also:  and you could also:
   
Line 338 
Line 341 
   
   
 =over  =over
   
   =item known_tags
   
       $known_tags = $entry->known_tags;
   
   $known_tags by default would be:
   
       { context => '@',
         project => '+',
       }
   
 =item {tag}s  =item {tag}s
   
Legend:
Removed from v.1.25  
changed lines
  Added in v.1.27
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>