From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/58167 Path: main.gmane.org!not-for-mail From: "Ted Zlatanov" Newsgroups: gmane.emacs.gnus.general Subject: Re: Spam does not move Date: 27 Jul 2004 12:46:58 -0400 Organization: =?utf-8?B?0KLQtdC+0LTQvtGAINCX0LvQsNGC0LDQvdC+0LI=?= @ Cienfuegos Sender: ding-owner@lists.math.uh.edu Message-ID: <4nsmbdtn25.fsf@lifelogs.com> References: <86brkl921y.fsf@rumba.de.uu.net> <4nfz9wcmuq.fsf@lifelogs.com> <4n3c5piqtv.fsf@lifelogs.com> <4nacz63yy6.fsf@lifelogs.com> <4nzn6s6hro.fsf@lifelogs.com> <4nwu1q5iwj.fsf@lifelogs.com> <4nsmcbemha.fsf@lifelogs.com> <4n7jt3evko.fsf@lifelogs.com> NNTP-Posting-Host: deer.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: sea.gmane.org 1090948101 19429 80.91.224.253 (27 Jul 2004 17:08:21 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Tue, 27 Jul 2004 17:08:21 +0000 (UTC) Cc: ding@gnus.org Original-X-From: ding-owner+M6708@lists.math.uh.edu Tue Jul 27 19:07:47 2004 Return-path: Original-Received: from malifon.math.uh.edu ([129.7.128.13]) by deer.gmane.org with esmtp (Exim 3.35 #1 (Debian)) id 1BpVQY-0003zJ-00 for ; Tue, 27 Jul 2004 19:07:46 +0200 Original-Received: from localhost ([127.0.0.1] helo=lists.math.uh.edu) by malifon.math.uh.edu with smtp (Exim 3.20 #1) id 1BpVQK-0003I1-00; Tue, 27 Jul 2004 12:07:32 -0500 Original-Received: from util2.math.uh.edu ([129.7.128.23]) by malifon.math.uh.edu with esmtp (Exim 3.20 #1) id 1BpVQF-0003Hw-00 for ding@lists.math.uh.edu; Tue, 27 Jul 2004 12:07:27 -0500 Original-Received: from justine.libertine.org ([66.139.78.221] ident=postfix) by util2.math.uh.edu with esmtp (Exim 4.30) id 1BpVQC-0002j5-0U for ding@lists.math.uh.edu; Tue, 27 Jul 2004 12:07:24 -0500 Original-Received: from mail.bwh.harvard.edu (sysblade0.bwh.harvard.edu [134.174.9.44]) by justine.libertine.org (Postfix) with ESMTP id A765A3A0036 for ; Tue, 27 Jul 2004 12:07:22 -0500 (CDT) Original-Received: (qmail 24198 invoked from network); 27 Jul 2004 16:59:51 -0000 Envelope-Sender: tzz@lifelogs.com Envelope-Recipients: khosoda@venus.dti.ne.jp, ding@gnus.org, Original-Received: from asimov.bwh.harvard.edu (HELO asimov) ([134.174.9.63]) (envelope-sender ) by mail.bwh.harvard.edu (qmail-ldap-1.03) with SMTP for ; 27 Jul 2004 16:59:51 -0000 Mail-Followup-To: "Kohkichi Hosoda" , ding@gnus.org Original-To: "Kohkichi Hosoda" X-Face: bd.DQ~'29fIs`T_%O%C\g%6jW)yi[zuz6;d4V0`@y-~$#3P_Ng{@m+e4o<4P'#(_GJQ%TT= D}[Ep*b!\e,fBZ'j_+#"Ps?s2!4H2-Y"sx" In-Reply-To: (Kohkichi Hosoda's message of "Sun, 25 Jul 2004 23:29:09 +0900") User-Agent: Gnus/5.110003 (No Gnus v0.3) Emacs/21.3.50 (gnu/linux) Precedence: bulk Xref: main.gmane.org gmane.emacs.gnus.general:58167 X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:58167 On Sun, 25 Jul 2004, khosoda@venus.dti.ne.jp wrote: > I tried M-x debug-on-entry RET spam-list-articles RET. OK, but you need to use edebug or (debug) statements. Here's what I would use: (defun spam-list-articles (articles classification) (let ((mark-check (if (eq classification 'spam) 'spam-group-spam-mark-p 'spam-group-ham-mark-p)) alist mark-cache-yes mark-cache-no) (dolist (article articles) (let ((mark (gnus-summary-article-mark article))) (unless (or (memq mark mark-cache-yes) (memq mark mark-cache-no)) (if (funcall mark-check gnus-newsgroup-name mark) (push mark mark-cache-yes) (push mark mark-cache-no))) (debug (memq mark mark-cache-yes) mark-check article classification mark mark-cache-yes mark-cache-no) (when (memq mark mark-cache-yes) (push article alist)))) alist)) (press C-x C-e after the last parenthesis to use this function; do the same on the version in spam.el to revert to the original function). Run the following with M-: list all ham articles: (spam-list-articles 'ham) list all spam article: (spam-list-articles 'spam) while you are in the group summary buffer. You will get 1 debug statement for each article - save those separately, I don't need more than 2 examples of what happens with spam articles and 2 examples with ham articles (4 total) but it's OK if you send me more. Again, sorry that I can't find the problem, but it's happening only for you, so you have to do the hard work :) > What does "33" mean? ham? Gnus mark values are just character values, so 33 is ASCII exclammation (!), the tick mark. You can do something like (format "%c" 33) to find the visual representation of any mark. The spam-mark is $, value 36. Ted