[siesta-commit] siesta/lib/Siesta/Storage/Table List_Users.pm,1.2,1.3

[prev] [thread] [next] [lurker] [Date index for 2002/08/23]

Update of /cvsroot/siesta/siesta/lib/Siesta/Storage/Table
In directory usw-pr-cvs1:/tmp/cvs-serv28531

Modified Files:
	List_Users.pm 
Log Message:
wrangle inheritance


Index: List_Users.pm
===================================================================
RCS file: /cvsroot/siesta/siesta/lib/Siesta/Storage/Table/List_Users.pm,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -d -r1.2 -r1.3
--- List_Users.pm	21 Aug 2002 08:31:52 -0000	1.2
+++ List_Users.pm	23 Aug 2002 09:05:33 -0000	1.3
@@ -1,10 +1,10 @@
 package Siesta::Storage::Table::List_Users;
-
+use Siesta::Storage::Table;
 use base 'Siesta::Storage::Table';
 
 sub new {
-  my $class = shift;
-  return Siesta::Storage::Table::new($class,'list_users','',qw(list_id user_id));
+    my $class = shift;
+    return $class->SUPER::new('list_users', '', qw(list_id user_id));
 };
 
 1;

• [siesta-commit] siesta/lib/Siesta/Storage/Table List_Users.pm,1.2,1.3 clampr 10:05 on 23 Aug 2002

Generated at 13:57 on 01 Jul 2004 by mariachi 0.52