[siesta-commit] siesta/lib/Siesta/Plugin MembersOnly.pm,1.11,1.12 Send.pm,1.25,1.26 Subscribe.pm,1.5,1.6

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

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

Modified Files:
	MembersOnly.pm Send.pm Subscribe.pm 
Log Message:
perltidy

Index: MembersOnly.pm
===================================================================
RCS file: /cvsroot/siesta/siesta/lib/Siesta/Plugin/MembersOnly.pm,v
retrieving revision 1.11
retrieving revision 1.12
diff -u -d -r1.11 -r1.12
--- MembersOnly.pm	14 Sep 2002 15:22:54 -0000	1.11
+++ MembersOnly.pm	15 Sep 2002 11:34:06 -0000	1.12
@@ -13,7 +13,7 @@
     return if $mail->list->is_member( $mail->from );
 
     # I'm not even supposed to be here today.
-    $mail->to($mail->list->return_path);
+    $mail->to( $mail->list->return_path );
     $mail->reply( body => <<END);
 Hi,
 

Index: Send.pm
===================================================================
RCS file: /cvsroot/siesta/siesta/lib/Siesta/Plugin/Send.pm,v
retrieving revision 1.25
retrieving revision 1.26
diff -u -d -r1.25 -r1.26
--- Send.pm	14 Sep 2002 15:28:32 -0000	1.25
+++ Send.pm	15 Sep 2002 11:34:06 -0000	1.26
@@ -14,8 +14,8 @@
     my $list = $mail->list;
     for my $user ( $list->members ) {
         $mail->user($user);
-	$mail->from($list->post_address());
-	$mail->to($user->id);
+        $mail->from( $list->post_address() );
+        $mail->to( $user->id );
         Siesta->sender->process($mail);
     }
     return;

Index: Subscribe.pm
===================================================================
RCS file: /cvsroot/siesta/siesta/lib/Siesta/Plugin/Subscribe.pm,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -d -r1.5 -r1.6
--- Subscribe.pm	12 Sep 2002 15:51:07 -0000	1.5
+++ Subscribe.pm	15 Sep 2002 11:34:06 -0000	1.6
@@ -16,12 +16,12 @@
 
     my $user = Siesta::User->new($user_id);
 
-    unless (defined $user) {
-	    $user = Siesta::User->new_from_hash(id=>$user_id);
-	    $user->save();
+    unless ( defined $user ) {
+        $user = Siesta::User->new_from_hash( id => $user_id );
+        $user->save();
     }
 
-    if ( $list->add_member( $user_id ) ) {
+    if ( $list->add_member($user_id) ) {
         $mail->reply( body => <<END);
 Hi,
  You have been successfully subscribed to ${ \( $list->id ) }

• [siesta-commit] siesta/lib/Siesta/Plugin MembersOnly.pm,1.11,1.12 Send.pm,1.25,1.26 Subscribe.pm,1.5,1.6 clampr 12:34 on 15 Sep 2002

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