From: raeburn@cygnus.com (Ken Raeburn)
Cc: ding@ifi.uio.no
Subject: POP handling bug
Date: 16 Jan 1996 00:24:56 -0500 [thread overview]
Message-ID: <tx168ecemon.fsf@cujo.cygnus.com> (raw)
September Gnus v0.26; nntp 4.0; nnvirtual 1.0; nnml 1.0; nnmh 1.0
GNU Emacs 19.30.1 (alpha-dec-osf3.2) of Tue Dec 12 1995 on cujo.cygnus.com
Greg Stark and I just sat down and tracked down a long-standing
problem he and others have been seeing with the POP code I submitted
some time ago. It turns out there are variations in how movemail
writes the mail headers. One version (which is the one my company
includes with its network security software) writes the "EOOH" line.
The version in the current emacs release does not. The code I
submitted (and sgnus-0.26) assumed the line would always be there.
This patch should make the line optional:
--- nnmail.el~ Wed Dec 20 22:09:47 1995
+++ nnmail.el Mon Jan 15 23:56:02 1996
@@ -451,7 +451,7 @@
(let (start message-id content-length do-search end)
(while (not (eobp))
(goto-char (point-min))
- (re-search-forward "\f\n0, *unseen,+\n\\*\\*\\* EOOH \\*\\*\\*\n" nil t)
+ (re-search-forward "\f\n0, *unseen,+\n\\(\\*\\*\\* EOOH \\*\\*\\*\n\\)?" nil t)
(goto-char (match-end 0))
(delete-region (match-beginning 0) (match-end 0))
(setq start (point))
------------------- Environment follows -------------------
(setq gnus-default-nntp-server "")
(setq gnus-local-domain "cygnus.com")
(setq gnus-local-organization "Cygnus Support, Cambridge MA")
(setq gnus-select-method '(nntp "cambridge-news.cygnus.com"))
(setq gnus-secondary-select-methods '((nnml "")))
(setq gnus-startup-file "~/News/.newsrc")
(setq gnus-use-cross-reference 42)
(setq gnus-summary-make-false-root nil)
(setq gnus-summary-gather-subject-limit 'fuzzy)
(setq gnus-decode-encoded-word-method #[nil "@\a" [nil] 1])
(setq gnus-ignored-newsgroups "^aus\\.\\|^ba\\.\\|^bionet\\.\\|^bit\\.\\|^dc\\.\\|^de\\.\\|^eunet\\.\\|^fj\\.\\|^fr\\.\\|^hiv\\.\\|^info\\.\\|^k12\\.\\|^k5\\.\\|^k7\\.\\|^no\\.\\|^ny\\.\\|^soc\\.\\|^sub\\.\\|^talk\\.\\|^usa-today\\.\\|^vmsnet\\.")
(setq gnus-auto-center-summary nil)
(setq gnus-summary-line-format "%U%R%z%I%6N %d%[%4L:%-15,15n%] %s
")
(setq gnus-auto-expirable-newsgroups "nnml:.*")
(setq gnus-hidden-properties '(invisible t))
(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-unread-as-read) gnus-mark-article-hook gnus-article-prepare-hook] 3]))
(setq nnmail-split-methods 'nnmail-split-fancy)
(setq nnmail-keep-last-article t)
(setq nnmail-expiry-wait 5)
(setq nnmail-spool-file "po:raeburn")
(setq nnmail-movemail-program "/usr/kerberos/bin/movemail")
reply other threads:[~1996-01-16 5:24 UTC|newest]
Thread overview: [no followups] expand[flat|nested] mbox.gz Atom feed
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=tx168ecemon.fsf@cujo.cygnus.com \
--to=raeburn@cygnus.com \
--cc=ding@ifi.uio.no \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).