From: yamaoka@jpl.org (Katsumi Yamaoka / 山岡 克美)
Subject: Re: 0.50 bug: gnus tries to search for empty line in message
Date: 19 Nov 1998 10:03:44 +0900 [thread overview]
Message-ID: <28ww4slci7.fsf@kchisa.ga.sony.co.jp> (raw)
In-Reply-To: yamaoka@jpl.org's message of "19 Nov 1998 09:33:44 +0900"
[-- Attachment #1: Type: text/plain, Size: 310 bytes --]
>>>>> In <2890h8msgn.fsf@kchisa.ga.sony.co.jp>
>>>>> yamaoka@jpl.org (Katsumi Yamaoka) wrote:
KY> This is another patch for the problem. How's it?
KY> --- message.el~ Wed Nov 18 10:20:17 1998
KY> +++ message.el Thu Nov 19 09:22:10 1998
Sorry, it does not work for multipart message. The fixed one follows.
[-- Attachment #2: Type: application/octet-stream, Size: 838 bytes --]
--- message.el~ Wed Nov 18 10:20:17 1998
+++ message.el Thu Nov 19 09:56:50 1998
@@ -4126,15 +4126,18 @@
(widen)
(forward-line -1)
(let ((beg (point))
- (line (buffer-substring (point) (progn (forward-line 1) (point)))))
+ (line (buffer-substring
+ (point)
+ (progn (forward-line 1) (1- (point))))))
(delete-region beg (point))
(insert "Mime-Version: 1.0\n")
- (search-forward "\n\n")
- (forward-char -1)
+ (unless (eolp)
+ (search-forward "\n\n")
+ (forward-char -1))
(insert line)
(when (save-excursion
(re-search-backward "^Content-Type: multipart/" nil t))
- (insert "This is a MIME multipart message. If you are reading\n")
+ (insert "\nThis is a MIME multipart message. If you are reading\n")
(insert "this, you shouldn't.\n"))))))
(run-hooks 'message-load-hook)
[-- Attachment #3: Type: text/plain, Size: 38 bytes --]
--
Katsumi Yamaoka <yamaoka@jpl.org>
prev parent reply other threads:[~1998-11-19 1:03 UTC|newest]
Thread overview: 4+ messages / expand[flat|nested] mbox.gz Atom feed top
1998-11-18 15:29 Vladimir Volovich
1998-11-18 18:56 ` Shenghuo ZHU
1998-11-19 0:33 ` Katsumi Yamaoka / 山岡 克美
1998-11-19 1:03 ` Katsumi Yamaoka / 山岡 克美 [this message]
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=28ww4slci7.fsf@kchisa.ga.sony.co.jp \
--to=yamaoka@jpl.org \
/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).