[prev] [thread] [next] [lurker] [Date index for 2002/08/23]
Update of /cvsroot/siesta/siesta/lib/Siesta/Plugin In directory usw-pr-cvs1:/tmp/cvs-serv1428 Modified Files: Debounce.pm Log Message: though we need to check the right method (doh!) Index: Debounce.pm =================================================================== RCS file: /cvsroot/siesta/siesta/lib/Siesta/Plugin/Debounce.pm,v retrieving revision 1.3 retrieving revision 1.4 diff -u -d -r1.3 -r1.4 --- Debounce.pm 23 Aug 2002 17:16:58 -0000 1.3 +++ Debounce.pm 23 Aug 2002 17:17:35 -0000 1.4 @@ -10,7 +10,7 @@ my $mail = shift; my $post = $mail->list->post_address; - for my $been ($mail->list->get('X-Been-There')) { + for my $been ($mail->head->get('X-Been-There')) { chomp $been; # have we been here before? return 1 if $been eq $post;
Generated at 13:57 on 01 Jul 2004 by mariachi 0.52