Parent Directory | Revision Log | Patch
revision 396 by dpavlin, Tue Sep 8 17:30:14 2009 UTC | revision 408 by dpavlin, Wed Sep 9 10:13:08 2009 UTC | |
---|---|---|
# | Line 89 sub STORE { | Line 89 sub STORE { |
89 | sub FETCH { | sub FETCH { |
90 | warn dump @_; | warn dump @_; |
91 | my $self = shift; | my $self = shift; |
92 | read_file $$self->{path}; | my $v = read_file $$self->{path}; |
93 | chomp($v); | |
94 | $v; | |
95 | } | } |
96 | ||
97 | 3; | 3; |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |