From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/4552 Path: main.gmane.org!not-for-mail From: Rick Flower Newsgroups: gmane.emacs.gnus.general Subject: Scoring problem in Gnus 5.0.13 Date: Thu, 21 Dec 1995 17:51:21 -0800 Message-ID: <199512220151.RAA21255@flotsam.sp.trw.com> NNTP-Posting-Host: coloc-standby.netfonds.no X-Trace: main.gmane.org 1035145284 30059 80.91.224.250 (20 Oct 2002 20:21:24 GMT) X-Complaints-To: usenet@main.gmane.org NNTP-Posting-Date: Sun, 20 Oct 2002 20:21:24 +0000 (UTC) Return-Path: ding-request@ifi.uio.no Original-Received: from ifi.uio.no (ifi.uio.no [129.240.64.2]) by miranova.com (8.6.11/8.6.9) with ESMTP id SAA05955 for ; Thu, 21 Dec 1995 18:17:27 -0800 Original-Received: from emu.sp.trw.com (emu.sp.TRW.COM [129.4.20.46]) by ifi.uio.no with ESMTP (8.6.11/ifi2.4) id for ; Fri, 22 Dec 1995 02:51:54 +0100 Original-Received: from flotsam.sp.trw.com (flotsam.sp.TRW.COM [129.4.22.136]) by emu.sp.trw.com (8.6.12/8.6.12) with ESMTP id RAA22789 for ; Thu, 21 Dec 1995 17:50:20 -0800 Original-Received: by flotsam.sp.trw.com (8.6.12) id RAA21255; Thu, 21 Dec 1995 17:51:21 -0800 Original-To: ding@ifi.uio.no Xref: main.gmane.org gmane.emacs.gnus.general:4552 X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:4552 Hi all! I've just started playing around with scoring with Gnus.. Anyway, since I'm running under VMS, I had to make a few changes to Gnu's Kiboze stuff to keep it from using ":" in any filenames.. I changed them to "$" instead.. So, with that out of the way, I was able to start nnkiboze-generate-groups running. After it chunks along for a while, I get the following : =========================================================== Signalling: (error "Illegal match type: r") apply(debug error (error "Illegal match type: r")) edebug(error (error "Illegal match type: r")) edebug-original-signal(error ("Illegal match type: r")) signal(error ("Illegal match type: r")) error("Illegal match type: %s" r) gnus-score-integer((((touched nil) ("chars" ...))) "chars" 728648 728641 nil) gnus-score-headers(("DK_FLOWER:[FLOWER.NEWS.DEFAULTS]NNKIBOZE$SATS1.SCORE") nil) gnus-possibly-score-headers() gnus-summary-read-group("trw.mailing-lists.com-priv" nil t) gnus-group-read-group(nil t) (edebug-after (edebug-before 0) 2 (gnus-group-read-group (edebug-after 0 1 all) t)) (lambda nil (edebug-after (edebug-before 0) 2 (gnus-group-read-group ... t)))() edebug-enter(gnus-group-select-group (nil) (lambda nil (edebug-after (edebug-before 0) 2 (gnus-group-read-group ... t)))) gnus-group-select-group(nil) (edebug-after (edebug-before 128) 129 (gnus-group-select-group nil)) (progn (edebug-after (edebug-before 128) 129 (gnus-group-select-group nil)) (edebug-after (edebug-before 130) 132 (eq ... ...))) (edebug-after (edebug-before 127) 133 (progn (edebug-after ... 129 ...) (edebug-after ... 132 ...))) (and (edebug-after (edebug-before 113) 126 (or ... ...)) (edebug-after (edebug-before 127) 133 (progn ... ...))) (edebug-after (edebug-before 112) 134 (and (edebug-after ... 126 ...) (edebug-after ... 133 ...))) (not (edebug-after (edebug-before 112) 134 (and ... ...))) (edebug-after (edebug-before 111) 135 (not (edebug-after ... 134 ...))) (if (edebug-after (edebug-before 111) 135 (not ...)) nil (edebug-after (edebug-before 136) 142 (setq lowest ...)) (edebug-after (edebug-before 143) 147 (setq method ...)) (edebug-after (edebug-before 148) 155 (and ... ...)) (edebug-after (edebug-before 156) 191 (while ... ... ...)) (edebug-after (edebug-before 192) 193 (gnus-summary-quit))) (edebug-after (edebug-before 110) 194 (if (edebug-after ... 135 ...) nil (edebug-after ... 142 ...) (edebug-after ... 147 ...) (edebug-after ... 155 ...) (edebug-after ... 191 ...) (edebug-after ... 193 ...))) (if (edebug-after (edebug-before 59) 70 (not ...)) (edebug-after (edebug-before 71) 78 (setq nnkiboze-newsrc ...)) (edebug-after (edebug-before 79) 81 (switch-to-buffer ...)) (edebug-after (edebug-before 82) 88 (gnus-group-jump-to-group ...)) (edebug-after (edebug-before 89) 109 (if ... ...)) (edebug-after (edebug-before 110) 194 (if ... nil ... ... ... ... ...))) (edebug-after (edebug-before 58) 195 (if (edebug-after ... 70 ...) (edebug-after ... 78 ...) (edebug-after ... 81 ...) (edebug-after ... 88 ...) (edebug-after ... 109 ...) (edebug-after ... 194 ...))) (while (edebug-after 0 57 newsrc) (edebug-after (edebug-before 58) 195 (if ... ... ... ... ... ...)) (edebug-after (edebug-before 196) 203 (setcdr ... ...)) (edebug-after (edebug-before 204) 208 (setq newsrc ...))) (edebug-after (edebug-before 56) 209 (while (edebug-after 0 57 newsrc) (edebug-after ... 195 ...) (edebug-after ... 203 ...) (edebug-after ... 208 ...))) (let* ((info ...) (newsrc-file ...) (nov-file ...) (regexp ...) (gnus-expert-user t) (gnus-large-newsgroup nil) (version-control ...) (gnus-score-find-score-files-function ...) gnus-select-group-hook gnus-summary-prepare-hook gnus-thread-sort-functions gnus-show-threads gnus-visual method nnkiboze-newsrc nov-buffer gname newsrc active ginfo lowest) (edebug-after (edebug-before 20) 22 (setq nnkiboze-current-score-group ...)) (edebug-after (edebug-before 23) 28 (or ... ...)) (edebug-after (edebug-before 29) 36 (and ... ...)) (edebug-after (edebug-before 37) 49 (save-excursion ... ...)) (edebug-after (edebug-before 50) 52 (mapatoms ... ...)) (edebug-after (edebug-before 53) 55 (setq newsrc ...)) (edebug-after (edebug-before 56) 209 (while ... ... ... ...)) (edebug-after (edebug-before 210) 212 (set-buffer ...)) (edebug-after (edebug-before 213) 214 (save-buffer)) (edebug-after (edebug-before 215) 218 (kill-buffer ...)) (edebug-after (edebug-before 219) 222 (set-buffer ...)) (edebug-after (edebug-before 223) 22 6 (buffer-disable-undo ...)) (edebug-after (edebug-before 227) 228 (erase-buffer)) (edebug-after (edebug-before 229) 233 (insert "(setq nnkiboze-newsrc '" ... ")\n")) (edebug-after (edebug-before 234) 236 (write-file ...)) (edebug-after (edebug-before 237) 240 (kill-buffer ...)) (edebug-after (edebug-before 241) 243 (switch-to-buffer ...)) (edebug-after (edebug-before 244) 245 (gnus-group-list-groups 5 nil))) (edebug-after (edebug-before 0) 246 (let* (... ... ... ... ... ... ... ... gnus-select-group-hook gnus-summary-prepare-hook gnus-thread-sort-functions gnus-show-threads gnus-visual method nnkiboze-newsrc nov-buffer gname newsrc active ginfo lowest) (edebug-after ... 22 ...) (edebug-after ... 28 ...) (edebug-after ... 36 ...) (edebug-after ... 49 ...) (edebug-after ... 52 ...) (edebug-after ... 55 ...) (edebug-after ... 209 ...) (edebug-after ... 212 ...) (edebug-after ... 214 ...) (edebug-after ... 218 .. .) (edebug-after ... 222 ...) (edebug-after ... 226 ...) (edebug-after ... 228 ...) (edebug-after ... 233 ...) (edebug-after ... 236 ...) (edebug-after ... 240 ...) (edebug-after ... 243 ...) (edebug-after ... 245 ...))) (lambda nil (edebug-after (edebug-before 0) 246 (let* ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ...)))() edebug-enter(nnkiboze-generate-group ("nnkiboze$sats1") (lambda nil (edebug-after (edebug-before 0) 246 (let* ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ...)))) nnkiboze-generate-group("nnkiboze$sats1") (edebug-after (edebug-before 19) 25 (nnkiboze-generate-group (edebug-after ... 24 ...))) (if (edebug-after (edebug-before 12) 18 (string-match "nnkiboze" ...)) (edebug-after (edebug-before 19) 25 (nnkiboze-generate-group ...))) (edebug-after (edebug-before 11) 26 (if (edebug-after ... 18 ...) (edebug-after ... 25 ...))) (while (edebug-after 0 10 newsrc) (edebug-after (edebug-before 11) 26 (if ... ...)) (edebug-after (edebug-before 27) 31 (setq newsrc ...))) (edebug-after (edebug-before 9) 32 (while (edebug-after 0 10 newsrc) (edebug-after ... 26 ...) (edebug-after ... 31 ...))) (let* ((gnus-newsrc-alist ...) (newsrc ...)) (edebug-after (edebug-before 9) 32 (while ... ... ...))) (edebug-after (edebug-before 4) 33 (let* (... ...) (edebug-after ... 32 ...))) (lambda nil (edebug-after (edebug-before 0) 3 (let ... ...)) (edebug-after (edebug-before 4) 33 (let* ... ...)))() edebug-enter(nnkiboze-generate-groups nil (lambda nil (edebug-after (edebug-before 0) 3 (let ... ...)) (edebug-after (edebug-before 4) 33 (let* ... ...)))) edebug-enter(nnkiboze-generate-groups nil (lambda nil (edebug-after (edebug-before 0) 3 (let ... ...)) (edebug-after (edebug-before 4) 33 (let* ... ...)))) nnkiboze-generate-groups() call-interactively(nnkiboze-generate-groups) (let (prefix-arg prefix-argument) (call-interactively command)) execute-extended-command(nnkiboze-generate-groups nil) * call-interactively(execute-extended-command) recursive-edit() edebug-recursive-edit() edebug-display() edebug(error (error "Illegal match type: r")) edebug-original-signal(error ("Illegal match type: r")) signal(error ("Illegal match type: r")) error("Illegal match type: %s" r) gnus-score-integer((((touched nil) ("chars" ...))) "chars" 728648 728641 nil) gnus-score-headers(("DK_FLOWER:[FLOWER.NEWS.DEFAULTS]NNKIBOZE$SATS1.SCORE") nil) gnus-possibly-score-headers() gnus-summary-read-group("trw.mailing-lists.com-priv" nil t) gnus-group-read-group(nil t) gnus-group-select-group(nil) (edebug-after (edebug-before 128) 129 (gnus-group-select-group nil)) (progn (edebug-after (edebug-before 128) 129 (gnus-group-select-group nil)) (edebug-after (edebug-before 130) 132 (eq ... ...))) (edebug-after (edebug-before 127) 133 (progn (edebug-after ... 129 ...) (edebug-after ... 132 ...))) (and (edebug-after (edebug-before 113) 126 (or ... ...)) (edebug-after (edebug-before 127) 133 (progn ... ...))) (edebug-after (edebug-before 112) 134 (and (edebug-after ... 126 ...) (edebug-after ... 133 ...))) (not (edebug-after (edebug-before 112) 134 (and ... ...))) (edebug-after (edebug-before 111) 135 (not (edebug-after ... 134 ...))) (if (edebug-after (edebug-before 111) 135 (not ...)) nil (edebug-after (edebug-before 136) 142 (setq lowest ...)) (edebug-after (edebug-before 143) 147 (setq method ...)) (edebug-after (edebug-before 148) 155 (and ... ...)) (edebug-after (edebug-before 156) 191 (while ... ... ...)) (edebug-after (edebug-before 192) 193 (gnus-summary-quit))) (edebug-after (edebug-before 110) 194 (if (edebug-after ... 135 ...) nil (edebug-after ... 142 ...) (edebug-after ... 147 ...) (edebug-after ... 155 ...) (edebug-after ... 191 ...) (edebug-after ... 193 ...))) (if (edebug-after (edebug-before 59) 70 (not ...)) (edebug-after (edebug-before 71) 78 (setq nnkiboze-newsrc ...)) (edebug-after (edebug-before 79) 81 (switch-to-buffer ...)) (edebug-after (edebug-before 82) 88 (gnus-group-jump-to-group ...)) (edebug-after (edebug-before 89) 109 (if ... ...)) (edebug-after (edebug-before 110) 194 (if ... nil ... ... ... ... ...))) (edebug-after (edebug-before 58) 195 (if (edebug-after ... 70 ...) (edebug-after ... 78 ...) (edebug-after ... 81 ...) (edebug-after ... 88 ...) (edebug-after ... 109 ...) (edebug-after ... 194 ...))) (while (edebug-after 0 57 newsrc) (edebug-after (edebug-before 58) 195 (if ... ... ... ... ... ...)) (edebug-after (edebug-before 196) 203 (setcdr ... ...)) (edebug-after (edebug-before 204) 208 (setq newsrc ...))) (edebug-after (edebug-before 56) 209 (while (edebug-after 0 57 newsrc) (edebug-after ... 195 ...) (edebug-after ... 203 ...) (edebug-after ... 208 ...))) (let* ((info ...) (newsrc-file ...) (nov-file ...) (regexp ...) (gnus-expert-user t) (gnus-large-newsgroup nil) (version-control ...) (gnus-score-find-score-files-function ...) gnus-select-group-hook gnus-summary-prepare-hook gnus-thread-sort-functions gnus-show-threads gnus-visual method nnkiboze-newsrc nov-buffer gname newsrc active ginfo lowest) (edebug-after (edebug-before 20) 22 (setq nnkiboze-current-score-group ...)) (edebug-after (edebug-before 23) 28 (or ... ...)) (edebug-after (edebug-before 29) 36 (and ... ...)) (edebug-after (edebug-before 37) 49 (save-excursion ... ...)) (edebug-after (edebug-before 50) 52 (mapatoms ... ...)) (edebug-after (edebug-before 53) 55 (setq newsrc ...)) (edebug-after (edebug-before 56) 209 (while ... ... ... ...)) (edebug-after (edebug-before 210) 212 (set-buffer ...)) (edebug-after (edebug-before 213) 214 (save-buffer)) (edebug-after (edebug-before 215) 218 (kill-buffer ...)) (edebug-after (edebug-before 219) 222 (set-buffer ...)) (edebug-after (edebug-before 223) 22 6 (buffer-disable-undo ...)) (edebug-after (edebug-before 227) 228 (erase-buffer)) (edebug-after (edebug-before 229) 233 (insert "(setq nnkiboze-newsrc '" ... ")\n")) (edebug-after (edebug-before 234) 236 (write-file ...)) (edebug-after (edebug-before 237) 240 (kill-buffer ...)) (edebug-after (edebug-before 241) 243 (switch-to-buffer ...)) (edebug-after (edebug-before 244) 245 (gnus-group-list-groups 5 nil))) (edebug-after (edebug-before 0) 246 (let* (... ... ... ... ... ... ... ... gnus-select-group-hook gnus-summary-prepare-hook gnus-thread-sort-functions gnus-show-threads gnus-visual method nnkiboze-newsrc nov-buffer gname newsrc active ginfo lowest) (edebug-after ... 22 ...) (edebug-after ... 28 ...) (edebug-after ... 36 ...) (edebug-after ... 49 ...) (edebug-after ... 52 ...) (edebug-after ... 55 ...) (edebug-after ... 209 ...) (edebug-after ... 212 ...) (edebug-after ... 214 ...) (edebug-after ... 218 .. .) (edebug-after ... 222 ...) (edebug-after ... 226 ...) (edebug-after ... 228 ...) (edebug-after ... 233 ...) (edebug-after ... 236 ...) (edebug-after ... 240 ...) (edebug-after ... 243 ...) (edebug-after ... 245 ...))) (lambda nil (edebug-after (edebug-before 0) 246 (let* ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ...)))() edebug-enter(nnkiboze-generate-group ("nnkiboze$sats1") (lambda nil (edebug-after (edebug-before 0) 246 (let* ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ...)))) nnkiboze-generate-group("nnkiboze$sats1") (edebug-after (edebug-before 19) 25 (nnkiboze-generate-group (edebug-after ... 24 ...))) (if (edebug-after (edebug-before 12) 18 (string-match "nnkiboze" ...)) (edebug-after (edebug-before 19) 25 (nnkiboze-generate-group ...))) (edebug-after (edebug-before 11) 26 (if (edebug-after ... 18 ...) (edebug-after ... 25 ...))) (while (edebug-after 0 10 newsrc) (edebug-after (edebug-before 11) 26 (if ... ...)) (edebug-after (edebug-before 27) 31 (setq newsrc ...))) (edebug-after (edebug-before 9) 32 (while (edebug-after 0 10 newsrc) (edebug-after ... 26 ...) (edebug-after ... 31 ...))) (let* ((gnus-newsrc-alist ...) (newsrc ...)) (edebug-after (edebug-before 9) 32 (while ... ... ...))) (edebug-after (edebug-before 4) 33 (let* (... ...) (edebug-after ... 32 ...))) (lambda nil (edebug-after (edebug-before 0) 3 (let ... ...)) (edebug-after (edebug-before 4) 33 (let* ... ...)))() edebug-enter(nnkiboze-generate-groups nil (lambda nil (edebug-after (edebug-before 0) 3 (let ... ...)) (edebug-after (edebug-before 4) 33 (let* ... ...)))) edebug-enter(nnkiboze-generate-groups nil (lambda nil (edebug-after (edebug-before 0) 3 (let ... ...)) (edebug-after (edebug-before 4) 33 (let* ... ...)))) nnkiboze-generate-groups() call-interactively(nnkiboze-generate-groups) (let (prefix-arg prefix-argument) (call-interactively command)) execute-extended-command(nnkiboze-generate-groups nil) * call-interactively(execute-extended-command) =========================================================== The following is my score file : (("chars" ("Satellite" nil nil r)))