[siesta-commit] siesta/lib/Siesta User.pm,1.7,1.8

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

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

Modified Files:
	User.pm 
Log Message:
fix the docs


Index: User.pm
===================================================================
RCS file: /cvsroot/siesta/siesta/lib/Siesta/User.pm,v
retrieving revision 1.7
retrieving revision 1.8
diff -u -d -r1.7 -r1.8
--- User.pm	2 Sep 2002 15:16:08 -0000	1.7
+++ User.pm	3 Sep 2002 22:33:54 -0000	1.8
@@ -9,30 +9,25 @@
 use Siesta;
 
 
-
-=pod 
-
 =head1 NAME
 
 Siesta::User - manipulate a user
 
-
 =head1 METHODS
 
-=head2 (get|set)_id
+=head2 ->id
 
 get and set their id (usually their email address)
 
-=head2 (get|set)_forename
+=head2 ->forename
 
 get and set their forename 
 
-
-=head2 (get|set)_surname
+=head2 ->surname
 
 get and set their surname
 
-=head2 (get|set)_config 
+=head2 ->(get|set)_config 
 
 get and set config values for this User.
 
@@ -50,28 +45,27 @@
 
     my %user = Siesta->storage->load_user( $id );
     return unless %user;
-	
+
     my $user_config = new Siesta::Config::User($id);
     $user{config}   = $user_config;
 
-
     return bless \%user, $class;
 }
 
 
 sub get_config
 {
-	my ($self, $namespace, $key) = @_;
+        my ($self, $namespace, $key) = @_;
 
-	return $self->{config}->get($namespace, $key);
+        return $self->{config}->get($namespace, $key);
 
 }
 
 sub set_config
 {
-	my ($self, $namespace, $key, $value) = @_;
+        my ($self, $namespace, $key, $value) = @_;
 
-	return $self->{config}->set($namespace, $key, $value);
+        return $self->{config}->set($namespace, $key, $value);
 
 }
 

• [siesta-commit] siesta/lib/Siesta User.pm,1.7,1.8 clampr 23:33 on 03 Sep 2002

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