Re: articles which won't cache

[Roderick Schertler <roderick@gate.net>]

September Gnus v0.45; nntp 4.0; nnspool 2.0; nnmh 1.0; nndraft 1.0; nnfolder 1.0
GNU Emacs 19.30.1 (m88k-dg-dgux5.4R3.10, X toolkit) of Fri Dec  1 1995 on david

I haven't grokked what's going on, but I'm at least able to reproduce a
non-passive caching problem.  With any luck this bug is also the elusive
one I saw the other day.  What I'm seeing is this:

If I read an article and then tick it it is immediately saved in the
cache.  If I then exit the group the article is removed from the cache
(oops), yet it remains ticked.  (If I re-enter the group at that point
the article shows as ticked but not cached, and if I save .newsrc.eld
the article is in the ticked listed but not the cached list.)  I think
this behavior is due to the article being entered in
gnus-cache-removable-articles and then left there even after I've ticked
it.

If I re-enter the group after the above and display the article (which
is still ticked but not cached) it is again saved in the cache, if I
then exit the group it is again removed from the cache.  I believe the
problem here is that gnus-cache-removable-articles is not always cleared
out after I exit a group.

If you don't see this behavior I'll try to pare down my environment
until I can spot what the confounding factor is.

PS:  The new pp thing in gnus-debug is still off, note the double-quoted
variable names and "\n"s below.

------------------ Environment follows ------------------

(setq "gnus-default-nntp-server" "news" "\n")
(setq "gnus-local-domain" "ibcinc.com" "\n")
(setq "gnus-local-organization" "International Bonded Couriers/Miami" "\n")
(setq "gnus-use-generic-from" t "\n")
(setq "gnus-use-generic-path" "not-for-mail" "\n")
(setq "gnus-select-method"
      '(nnspool "junior.ibcinc.com")
      "\n")
(setq "gnus-refer-article-method"
      '(nntp "news")
      "\n")
(setq "gnus-dribble-directory" "~/tmp" "\n")
(setq "gnus-article-save-directory" "~/news/" "\n")
(setq "gnus-kill-files-directory" "~/news/" "\n")
(setq "gnus-default-article-saver"
      'gnus-summary-save-in-folder "\n")
(setq "gnus-folder-save-name"
      'rjs/gnus-folder-save-name "\n")
(setq "gnus-use-adaptive-scoring" t "\n")
(setq "gnus-use-cache" t "\n")
(setq "gnus-fetch-old-headers"
      'some "\n")
(setq "gnus-summary-make-false-root"
      'empty "\n")
(setq "gnus-summary-gather-subject-limit"
      'fuzzy "\n")
(setq "gnus-build-sparse-threads"
      'more "\n")
(setq "gnus-summary-same-subject" "-||-" "\n")
(setq "gnus-decode-encoded-word-method" #[nil "@\a" [nil] 1] "\n")
(setq "gnus-thread-ignore-subject" t "\n")
(setq "gnus-ignored-headers" "^\\(A\\(pproved\\|rticle-I.D.\\)\\|Content-\\(Length\\|T\\(ransfer-Encoding\\|ype\\)\\)\\|D\\(ate\\|istribution\\)\\|In-Reply-To\\|Li\\(nes\\|st-Name\\)\\|M\\(essage-ID\\|ime-Version\\)\\|NNTP-Posting-\\(Host\\|User\\)\\|Or\\(ganization\\|iginator\\)\\|P\\(ath\\|recedence\\)\\|Re\\(ceived\\|ferences\\)\\|Sender\\|X\\(-\\(Attribution\\|Disclaimer\\|Face\\|Geek-3\\|Loop\\|M\\(ail\\(er\\|ing-List\\)\\|oderator-.*\\|ts\\)\\|N\\(NTP-Posting-Host\\|SA-Fodder\\|ewsreader\\)\\|Quote\\(\\|-I-Like\\)\\|Ribbon\\|Submissions-To\\|UR[IL]\\|Zippy\\)\\|ref\\)\\):" "\n")
(setq "gnus-visible-headers" nil "\n")
(setq "gnus-sorted-header-list"
      '("^From:" "^Subject:" "^X-Sent:" "^Newsgroups:" "^Followup-To:")
      "\n")
(setq "gnus-boring-article-headers"
      '(empty followup-to newsgroups reply-to)
      "\n")
(setq "gnus-saved-headers" "^From:\\|^Newsgroups:\\|^Subject:\\|^Date:\\|^Followup-To:\\|^Reply-To:\\|^Organization:\\|^Summary:\\|^Keywords:\\|^To:\\|^Cc:\\|^Posted-To:\\|^Mail-Copies-To:\\|^Apparently-To:\\|^Gnus-Warning:\\|^Resent-" "\n")
(setq "gnus-auto-select-first" nil "\n")
(setq "gnus-subscribe-newsgroup-method"
      'gnus-subscribe-hierarchically "\n")
(setq "gnus-group-sort-function"
      '(gnus-group-sort-by-alphabet gnus-group-sort-by-level)
      "\n")
(setq "gnus-group-line-format" "%M%p%P %2ud %2ut %S %5y: %L %(%-40uc%) %18ue\n" "\n")
(setq "gnus-summary-line-format" "%U%R %5i %(%[%3L: %-18,18n%]%)%I %s\n" "\n")
(setq "gnus-article-mode-line-format" "Gnus A: %S" "\n")
(setq "gnus-mode-non-string-length" 33 "\n")
(setq "gnus-thread-sort-functions"
      '(gnus-thread-sort-by-number gnus-thread-sort-by-total-score)
      "\n")
(setq "gnus-summary-prepare-exit-hook"
      '(gnus-summary-expire-articles)
      "\n")
(setq "gnus-startup-hook"
      '(#[nil "@AB\"\b@AC\"\bD\x15@FB\"\a" [remove-hook gnus-summary-prepare-hook hilit-rehighlight-buffer-quietly hilit-install-line-hooks
	      (gnus-summary-mark-read-and-unread-as-read)
	      gnus-mark-article-hook gnus-article-prepare-hook] 3])
      "\n")
(setq "gnus-summary-prepare-hook"
      '(rjs/gnus-score-select-score-file)
      "\n")
(setq "gnus-article-prepare-hook"
      '(gnus-article-date-lapsed)
      "\n")
(setq "gnus-select-group-hook"
      '((lambda nil
	  (gnus-group-set-parameter group
				    'gnus-group-date-last-entered
				    (current-time))))
      "\n")
(setq "gnus-author-copy" "|rcvstore +post" "\n")
(setq "gnus-message-archive-group" nil "\n")
(setq "gnus-user-from-line" "Roderick Schertler <roderick@ibcinc.com>" "\n")
(setq "gnus-required-headers"
      '(From Date Newsgroups Subject Message-ID Lines)
      "\n")
(setq "gnus-auto-mail-to-author" t "\n")
(setq "gnus-mail-courtesy-message" "[This is a courtesy copy of a reply which was also posted to Usenet.]\n\n" "\n")
(setq "gnus-mail-method"
      'mh "\n")
(setq "gnus-score-expiry-days" 28 "\n")
(setq "gnus-score-after-write-file-function"
      'rjs/gnus-score-after-write-file "\n")
(setq "nnmail-spool-file" nil "\n")

-- 
Roderick Schertler
roderick@gate.net