From mboxrd@z Thu Jan 1 00:00:00 1970 Path: main.gmane.org!not-for-mail From: Kenichi Handa Newsgroups: gmane.emacs.devel Subject: Re: no confirmation that email sent when setting coding system Date: Wed, 7 Aug 2002 21:24:59 +0900 (JST) Sender: emacs-devel-admin@gnu.org Message-ID: <200208071224.VAA18034@etlken.m17n.org> References: NNTP-Posting-Host: localhost.gmane.org Mime-Version: 1.0 (generated by SEMI 1.14.3 - "Ushinoya") Content-Type: text/plain; charset=US-ASCII X-Trace: main.gmane.org 1028723137 332 127.0.0.1 (7 Aug 2002 12:25:37 GMT) X-Complaints-To: usenet@main.gmane.org NNTP-Posting-Date: Wed, 7 Aug 2002 12:25:37 +0000 (UTC) Cc: emacs-devel@gnu.org Return-path: Original-Received: from quimby.gnus.org ([80.91.224.244]) by main.gmane.org with esmtp (Exim 3.35 #1 (Debian)) id 17cPsb-00005D-00 for ; Wed, 07 Aug 2002 14:25:33 +0200 Original-Received: from fencepost.gnu.org ([199.232.76.164]) by quimby.gnus.org with esmtp (Exim 3.12 #1 (Debian)) id 17cQEC-0005ov-00 for ; Wed, 07 Aug 2002 14:47:52 +0200 Original-Received: from localhost ([127.0.0.1] helo=fencepost.gnu.org) by fencepost.gnu.org with esmtp (Exim 3.35 #1 (Debian)) id 17cPt8-0006XV-00; Wed, 07 Aug 2002 08:26:06 -0400 Original-Received: from tsukuba.m17n.org ([192.47.44.130]) by fencepost.gnu.org with smtp (Exim 3.35 #1 (Debian)) id 17cPsA-0006Nt-00 for ; Wed, 07 Aug 2002 08:25:06 -0400 Original-Received: from fs.m17n.org (fs.m17n.org [192.47.44.2]) by tsukuba.m17n.org (8.11.6/3.7W-20010518204228) with ESMTP id g77CP0l13568; Wed, 7 Aug 2002 21:25:00 +0900 (JST) (envelope-from handa@m17n.org) Original-Received: from etlken.m17n.org (etlken.m17n.org [192.47.44.125]) by fs.m17n.org (8.11.3/3.7W-20010823150639) with ESMTP id g77COx910470; Wed, 7 Aug 2002 21:24:59 +0900 (JST) Original-Received: (from handa@localhost) by etlken.m17n.org (8.8.8+Sun/3.7W-2001040620) id VAA18034; Wed, 7 Aug 2002 21:24:59 +0900 (JST) Original-To: bob@rattlesnake.com In-Reply-To: (bob@rattlesnake.com) User-Agent: SEMI/1.14.3 (Ushinoya) FLIM/1.14.2 (Yagi-Nishiguchi) APEL/10.2 Emacs/21.1.30 (sparc-sun-solaris2.6) MULE/5.0 (SAKAKI) Errors-To: emacs-devel-admin@gnu.org X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.0.11 Precedence: bulk List-Help: List-Post: List-Subscribe: , List-Id: Emacs development discussions. List-Unsubscribe: , List-Archive: Xref: main.gmane.org gmane.emacs.devel:6331 X-Report-Spam: http://spam.gmane.org/gmane.emacs.devel:6331 In article , "Robert J. Chassell" writes: > Sometimes (as with two recent bug reports to Kai), Mail mode asks me > which coding system to use (I have been choosing the default it > offers, which in this case has been utf-8). > After I choose the coding sytem, Emacs pops back the mail buffer, > marked as changed (i.e., ** in the mode line), whereas the usual > consequence of sending a message is to mark the buffer as unchanged > (i.e., -- in the mode line). > Also, in the usual course of events, an old *mail* buffer that is > marked unchanged is reused; but in this circumstance, it is not. > (This email message is being written in buffer *mail*<4> !) I've just committed this change. Could you please try again with the latest code or with this patch? --- Ken'ichi HANDA handa@etl.go.jp 2002-08-07 Kenichi Handa * international/mule-cmds.el (select-safe-coding-system): Call pop-to-buffer inside save-window-excursion and save-excursion. Index: mule-cmds.el =================================================================== RCS file: /cvs/emacs/lisp/international/mule-cmds.el,v retrieving revision 1.200 retrieving revision 1.201 diff -u -c -r1.200 -r1.201 cvs server: conflicting specifications of output style *** mule-cmds.el 5 Aug 2002 16:34:53 -0000 1.200 --- mule-cmds.el 7 Aug 2002 12:21:25 -0000 1.201 *************** *** 676,690 **** (coding-system-category elt))) (push elt l)))) ! ;; Make sure the offending buffer is displayed. ! (or (stringp from) ! (pop-to-buffer bufname)) ! (save-excursion ! (goto-char (unencodable-char-position ! from to (mapcar #'car default-coding-system))) ! ;; Then ask users to select one form CODINGS. ! (unwind-protect ! (save-window-excursion (with-output-to-temp-buffer "*Warning*" (save-excursion (set-buffer standard-output) --- 676,690 ---- (coding-system-category elt))) (push elt l)))) ! (unwind-protect ! (save-window-excursion ! (save-excursion ! ;; Make sure the offending buffer is displayed. ! (unless (stringp from) ! (pop-to-buffer bufname) ! (goto-char (unencodable-char-position ! from to (mapcar #'car default-coding-system)))) ! ;; Then ask users to select one from CODINGS. (with-output-to-temp-buffer "*Warning*" (save-excursion (set-buffer standard-output)