Parent Directory | Revision Log | Patch
revision 609 by dpavlin, Thu Nov 27 22:10:49 2008 UTC | revision 610 by dpavlin, Fri Nov 28 23:32:52 2008 UTC | |
---|---|---|
# | Line 51 sub session_dump { | Line 51 sub session_dump { |
51 | return $data; | return $data; |
52 | } | } |
53 | ||
54 | =head2 TODO | |
55 | ||
56 | my $TODO = $self->TODO( "message" ); | |
57 | ||
58 | =cut | |
59 | ||
60 | sub TODO { | sub TODO { |
61 | my ( $self, $what ) = @_; | my ( $self, $what ) = @_; |
62 | eval { | eval { |
# | Line 67 sub TODO { | Line 73 sub TODO { |
73 | } | } |
74 | }; | }; |
75 | warn "TODO ERROR: $@\n$what" if $@; | warn "TODO ERROR: $@\n$what" if $@; |
76 | return $what; | |
77 | } | } |
78 | ||
79 | 1; | 1; |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |