[siesta-commit] siesta/lib/Siesta/Plugin Debounce.pm,1.3,1.4

[prev] [thread] [next] [lurker] [Date index for 2002/08/23]

From: clampr
Subject: [siesta-commit] siesta/lib/Siesta/Plugin Debounce.pm,1.3,1.4
Date: 18:17 on 23 Aug 2002
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