--- trunk/lib/WebPAC/Output/JSON.pm 2007/10/30 20:32:16 916 +++ trunk/lib/WebPAC/Output/JSON.pm 2007/10/30 21:57:36 917 @@ -6,7 +6,6 @@ use base qw/WebPAC::Common WebPAC::Output Class::Accessor/; __PACKAGE__->mk_accessors(qw(path)); -#use Encode qw/from_to/; use Data::Dump qw/dump/; use JSON; use File::Slurp; @@ -31,7 +30,7 @@ =head2 new - my $output = new WebPAC::Output::JSON({ + my $out = new WebPAC::Output::JSON({ path => '/path/to/file.js', }); @@ -47,7 +46,7 @@ =head2 init - $output->init; + $out->init; =cut @@ -67,7 +66,7 @@ Adds one entry to database. - $est->add( 42, $ds ); + $out->add( 42, $ds ); =cut @@ -89,7 +88,7 @@ =head2 finish - $output->finish; + $out->finish; =cut