[siesta-commit] siesta/lib/Siesta User.pm,1.11,1.12

[prev] [thread] [next] [lurker] [Date index for 2002/09/06]

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

Modified Files:
	User.pm 
Log Message:
Add some functionality, fix some bugs.


Index: User.pm
===================================================================
RCS file: /cvsroot/siesta/siesta/lib/Siesta/User.pm,v
retrieving revision 1.11
retrieving revision 1.12
diff -u -d -r1.11 -r1.12
--- User.pm	5 Sep 2002 13:44:36 -0000	1.11
+++ User.pm	6 Sep 2002 10:26:14 -0000	1.12
@@ -40,6 +40,9 @@
 
 get and set their surname
 
+=head2 ->lists
+
+return all the lists that this user is on.
 
 =head2 ->save
 
@@ -74,6 +77,11 @@
     return bless $hash, $class;
 }
 
+sub lists
+{
+	my $self = shift;
+	return Siesta->storage->user_lists($self->id);
+}
 
 sub save {
         my $self = shift;

• [siesta-commit] siesta/lib/Siesta User.pm,1.11,1.12 muttley 11:26 on 06 Sep 2002

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