From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/77484 Path: news.gmane.org!not-for-mail From: Daiki Ueno Newsgroups: gmane.emacs.gnus.general Subject: Re: [gnus git] branch master updated: n0-13-65-gece58ab =2= Autoload `password-in-cache-p'. ; Try to fix XEmacs message-options buffer-local issue. Date: Fri, 04 Mar 2011 07:27:57 +0900 Message-ID: <8762rzx2j6.fsf@broken.deisui.org> References: <87ei6o1mdi.fsf@lifelogs.com> NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" X-Trace: dough.gmane.org 1299191317 8570 80.91.229.12 (3 Mar 2011 22:28:37 GMT) X-Complaints-To: usenet@dough.gmane.org NNTP-Posting-Date: Thu, 3 Mar 2011 22:28:37 +0000 (UTC) To: ding@gnus.org Original-X-From: ding-owner+M25807@lists.math.uh.edu Thu Mar 03 23:28:33 2011 Return-path: Envelope-to: ding-account@gmane.org Original-Received: from util0.math.uh.edu ([129.7.128.18]) by lo.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1PvH0X-0001YD-9I for ding-account@gmane.org; Thu, 03 Mar 2011 23:28:29 +0100 Original-Received: from localhost ([127.0.0.1] helo=lists.math.uh.edu) by util0.math.uh.edu with smtp (Exim 4.63) (envelope-from ) id 1PvH0P-0006Mp-21; Thu, 03 Mar 2011 16:28:21 -0600 Original-Received: from mx1.math.uh.edu ([129.7.128.32]) by util0.math.uh.edu with esmtps (TLSv1:AES256-SHA:256) (Exim 4.63) (envelope-from ) id 1PvH0N-0006MQ-1b for ding@lists.math.uh.edu; Thu, 03 Mar 2011 16:28:19 -0600 Original-Received: from quimby.gnus.org ([80.91.231.51]) by mx1.math.uh.edu with esmtp (Exim 4.72) (envelope-from ) id 1PvH0I-0002yB-Nh for ding@lists.math.uh.edu; Thu, 03 Mar 2011 16:28:18 -0600 Original-Received: from ivory4.scn-net.ne.jp ([219.117.176.192]) by quimby.gnus.org with smtp (Exim 4.72) (envelope-from ) id 1PvH0G-0002YH-HU for ding@gnus.org; Thu, 03 Mar 2011 23:28:13 +0100 Original-Received: from ([192.168.0.187]) (envelope sender: ) by ivory4.scn-net.ne.jp with Active!Hunter esmtp server; Fri, 4 Mar 2011 07:28:05 +0900 Original-Received: Received: from well-done.deisui.org (g187018.scn-net.ne.jp [202.83.187.18]) (authenticated) by blue17.scn-net.ne.jp (unknown) with ESMTP id p23MS4QS027716 for ; Fri, 4 Mar 2011 07:28:05 +0900 In-Reply-To: (Julien Danjou's message of "Thu, 03 Mar 2011 12:27:50 +0100") User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/23.2 (gnu/linux) X-Spam-Score: -1.9 (-) List-ID: Precedence: bulk Xref: news.gmane.org gmane.emacs.gnus.general:77484 Archived-At: --=-=-= Julien Danjou writes: > On Thu, Mar 03 2011, Ted Zlatanov wrote: > >> OK, I don't know that code so it's entirely possible I did something >> stupid. I was just duplicating the behavior from before your change >> (which Michael Piotrowski identified as the culprit) for XEmacs. Let's >> just keep XEmacs users functional, otherwise feel free to make any >> changes you think necessary. > > Just fixed your commit. Until someone really fixes that. Hm, I don't see the fix in the git.gnus.org - did you pushed it? :) In fact, I didn't notice that the previous work around (commit by Ted) was there and if I revert it I can finally reproduce the problem. I wonder why this is not the case with GNU Emacs, but anyway here is a fix: --=-=-= Content-Type: text/x-diff Content-Disposition: inline; filename=0001-mml-generate-mime-Inherit-message-options-after-mm-w.patch >From e3686735b34b4cfcf4752e84a24fe3ef33d8aeec Mon Sep 17 00:00:00 2001 From: Daiki Ueno Date: Thu, 3 Mar 2011 20:50:54 +0900 Subject: [PATCH] (mml-generate-mime): Inherit message-options after mm-with-multibyte-buffer. --- lisp/mml.el | 4 +++- 1 files changed, 3 insertions(+), 1 deletions(-) diff --git a/lisp/mml.el b/lisp/mml.el index 8b196fa..2f4417f 100644 --- a/lisp/mml.el +++ b/lisp/mml.el @@ -461,11 +461,13 @@ If MML is non-nil, return the buffer up till the correspondent mml tag." (defvar mml-boundary nil) (defvar mml-base-boundary "-=-=") (defvar mml-multipart-number 0) +(defvar message-options) (defun mml-generate-mime () "Generate a MIME message based on the current MML document." (let ((cont (mml-parse)) - (mml-multipart-number mml-multipart-number)) + (mml-multipart-number mml-multipart-number) + (message-options (if (boundp 'message-options) message-options))) (if (not cont) nil (mm-with-multibyte-buffer -- 1.7.2.3 --=-=-= Regards, -- Daiki Ueno --=-=-=--