[siesta-commit] siesta/lib/Siesta Plugin.pm,1.16,1.17

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

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

Modified Files:
	Plugin.pm 
Log Message:
Some cleanup.


Index: Plugin.pm
===================================================================
RCS file: /cvsroot/siesta/siesta/lib/Siesta/Plugin.pm,v
retrieving revision 1.16
retrieving revision 1.17
diff -u -d -r1.16 -r1.17
--- Plugin.pm	9 Sep 2002 13:04:36 -0000	1.16
+++ Plugin.pm	10 Sep 2002 09:21:07 -0000	1.17
@@ -2,6 +2,7 @@
 package Siesta::Plugin;
 use strict;
 use Class::MethodMaker new => 'new';
+use Siesta;
 
 =head1 NAME
 
@@ -41,8 +42,8 @@
 
     (my $package = ref $self) =~ s!^.*::!!;
 
-    my $list_id = $mail->list ? $mail->list->id() : undef;
-    my $user_id = $mail->user ? $mail->user->id() : undef;
+    my $list_id = defined $mail->list ? $mail->list->id() : undef;
+    my $user_id = defined $mail->user ? $mail->user->id() : undef;
 
     return Siesta->storage->config($package, $user_id, $list_id, @_);
 }

• [siesta-commit] siesta/lib/Siesta Plugin.pm,1.16,1.17 muttley 10:21 on 10 Sep 2002

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