[prev] [thread] [next] [lurker] [Date index for 2002/09/05]
Update of /cvsroot/siesta/siesta/lib/Siesta In directory usw-pr-cvs1:/tmp/cvs-serv9538 Modified Files: List.pm Log Message: Siesta::Config::* is no more Index: List.pm =================================================================== RCS file: /cvsroot/siesta/siesta/lib/Siesta/List.pm,v retrieving revision 1.27 retrieving revision 1.28 diff -u -d -r1.27 -r1.28 --- List.pm 5 Sep 2002 13:14:37 -0000 1.27 +++ List.pm 5 Sep 2002 13:45:19 -0000 1.28 @@ -1,23 +1,16 @@ # $Id$ - package Siesta::List; - use strict; use vars qw(@fields); BEGIN { - @fields = qw(id post_address return_path owner created ); + @fields = qw(id post_address return_path owner created ); } - use Class::MethodMaker get_set => \@fields; - use Siesta; use Siesta::User; -use Siesta::Config::List; - -=pod =head1 NAME @@ -81,10 +74,10 @@ sub new_from_hash { - my $class = shift; - my $hash = shift; + my $class = shift; + my $hash = shift; - bless $hash, $class; + bless $hash, $class; } sub save {
Generated at 13:57 on 01 Jul 2004 by mariachi 0.52