[siesta-commit] siesta/lib/Siesta Message.pm,1.29,1.30 Plugin.pm,1.26,1.27

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

From: clampr
Subject: [siesta-commit] siesta/lib/Siesta Message.pm,1.29,1.30 Plugin.pm,1.26,1.27
Date: 21:32 on 20 Sep 2002
Update of /cvsroot/siesta/siesta/lib/Siesta
In directory usw-pr-cvs1:/tmp/cvs-serv24478/lib/Siesta

Modified Files:
	Message.pm Plugin.pm 
Log Message:
perltidy

Index: Message.pm
===================================================================
RCS file: /cvsroot/siesta/siesta/lib/Siesta/Message.pm,v
retrieving revision 1.29
retrieving revision 1.30
diff -u -d -r1.29 -r1.30
--- Message.pm	20 Sep 2002 13:29:38 -0000	1.29
+++ Message.pm	20 Sep 2002 20:32:05 -0000	1.30
@@ -70,9 +70,8 @@
     $self->send( to => $to );
 }
 
-sub clone
-{
-	my $self = shift;
-	return dclone($self);
+sub clone {
+    my $self = shift;
+    return dclone($self);
 }
 1;

Index: Plugin.pm
===================================================================
RCS file: /cvsroot/siesta/siesta/lib/Siesta/Plugin.pm,v
retrieving revision 1.26
retrieving revision 1.27
diff -u -d -r1.26 -r1.27
--- Plugin.pm	20 Sep 2002 13:29:38 -0000	1.26
+++ Plugin.pm	20 Sep 2002 20:32:05 -0000	1.27
@@ -48,17 +48,15 @@
     return Siesta->storage->config( $package, $user_id, $list_id, @_ );
 }
 
-
 =item ->delete_config($message, $key)
 
 Deletes this particular config value from the database.
 
 =cut
 
-sub delete_config
-{
+sub delete_config {
 
-   my $self = shift;
+    my $self = shift;
     my $mail = shift;
 
     ( my $package = ref $self ) =~ s!^.*::!!;
@@ -68,7 +66,6 @@
 
     return Siesta->storage->delete_config( $package, $user_id, $list_id, @_ );
 }
-
 
 =item ->options()
 



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