From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Kenichi Handa Newsgroups: gmane.emacs.devel Subject: Re: [david.reitter@gmail.com: recentf: "Select coding system" on quit] Date: Fri, 22 Apr 2005 22:07:35 +0900 (JST) Message-ID: <200504221307.WAA02694@etlken.m17n.org> References: <16131584.1114096593070.JavaMail.www@wwinf1101> <200504220043.JAA01151@etlken.m17n.org> <139e63bed8ac36b91c33a4b51c3fe2bc@gmail.com> <200504220540.OAA01703@etlken.m17n.org> <85zmvrmedr.fsf@lola.goethe.zz> NNTP-Posting-Host: main.gmane.org Mime-Version: 1.0 (generated by SEMI 1.14.3 - "Ushinoya") Content-Type: text/plain; charset=US-ASCII X-Trace: sea.gmane.org 1114175270 17135 80.91.229.2 (22 Apr 2005 13:07:50 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Fri, 22 Apr 2005 13:07:50 +0000 (UTC) Cc: david.reitter@gmail.com, david.ponce@wanadoo.fr, rms@gnu.org, emacs-devel@gnu.org Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Fri Apr 22 15:07:40 2005 Return-path: Original-Received: from lists.gnu.org ([199.232.76.165]) by ciao.gmane.org with esmtp (Exim 4.43) id 1DOxr7-0001Zh-VF for ged-emacs-devel@m.gmane.org; Fri, 22 Apr 2005 15:06:03 +0200 Original-Received: from localhost ([127.0.0.1] helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1DOxw2-0006QR-VT for ged-emacs-devel@m.gmane.org; Fri, 22 Apr 2005 09:11:07 -0400 Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1DOxvn-0006QL-Cl for emacs-devel@gnu.org; Fri, 22 Apr 2005 09:10:51 -0400 Original-Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1DOxvl-0006Pg-M1 for emacs-devel@gnu.org; Fri, 22 Apr 2005 09:10:51 -0400 Original-Received: from [199.232.76.173] (helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1DOxvl-0006JE-HN for emacs-devel@gnu.org; Fri, 22 Apr 2005 09:10:49 -0400 Original-Received: from [192.47.44.130] (helo=tsukuba.m17n.org) by monty-python.gnu.org with esmtp (TLS-1.0:DHE_RSA_3DES_EDE_CBC_SHA:24) (Exim 4.34) id 1DOxvm-0004Fp-VE; Fri, 22 Apr 2005 09:10:51 -0400 Original-Received: from nfs.m17n.org (nfs.m17n.org [192.47.44.7]) by tsukuba.m17n.org (8.12.3/8.12.3/Debian-7.1) with ESMTP id j3MD7ZdY021781; Fri, 22 Apr 2005 22:07:35 +0900 Original-Received: from etlken.m17n.org (etlken.m17n.org [192.47.44.125]) by nfs.m17n.org (8.12.3/8.12.3/Debian-7.1) with ESMTP id j3MD7ZDI023653; Fri, 22 Apr 2005 22:07:35 +0900 Original-Received: (from handa@localhost) by etlken.m17n.org (8.8.8+Sun/3.7W-2001040620) id WAA02694; Fri, 22 Apr 2005 22:07:35 +0900 (JST) Original-To: David Kastrup In-reply-to: <85zmvrmedr.fsf@lola.goethe.zz> (message from David Kastrup on Fri, 22 Apr 2005 09:58:40 +0200) User-Agent: SEMI/1.14.3 (Ushinoya) FLIM/1.14.2 (Yagi-Nishiguchi) APEL/10.2 Emacs/22.0.50 (sparc-sun-solaris2.6) MULE/5.0 (SAKAKI) X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: "Emacs development discussions." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Errors-To: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.devel:36269 X-Report-Spam: http://spam.gmane.org/gmane.emacs.devel:36269 In article <85zmvrmedr.fsf@lola.goethe.zz>, David Kastrup writes: >> Ok, I've just installed the last version sent from David >> . > Please, it has been pointed out already that this is not the proper > way to fix it. It makes the source very unreadable. > Instead, you should just place a formfeed character (^L) after the > last function in the file. Local variable sections are not detected > before such a character, and it is precisely for this purpose. As David wrote, that's what I installed. See the attached change. --- Ken'ichi HANDA handa@m17n.org Index: recentf.el =================================================================== RCS file: /cvsroot/emacs/emacs/lisp/recentf.el,v retrieving revision 1.35 retrieving revision 1.36 diff -u -c -r1.35 -r1.36 cvs diff: conflicting specifications of output style *** recentf.el 23 Mar 2005 07:20:48 -0000 1.35 --- recentf.el 22 Apr 2005 05:38:29 -0000 1.36 *************** *** 1137,1142 **** --- 1137,1148 ---- ";;; Automatically generated by `recentf' on %s.\n" "Header to be written into the `recentf-save-file'.") + (defconst recentf-save-file-coding-system + (if (coding-system-p 'utf-8-emacs) + 'utf-8-emacs + 'emacs-mule) + "Coding system of the file `recentf-save-file'.") + (defun recentf-save-list () "Save the recent list. Write data into the file specified by `recentf-save-file'." *************** *** 1144,1152 **** --- 1150,1162 ---- (condition-case error (with-temp-buffer (erase-buffer) + (set-buffer-file-coding-system recentf-save-file-coding-system) (insert (format recentf-save-file-header (current-time-string))) (recentf-dump-variable 'recentf-list recentf-max-saved-items) (recentf-dump-variable 'recentf-filter-changer-state) + (insert "\n \n;;; Local Variables:\n" + (format ";;; coding: %s\n" recentf-save-file-coding-system) + ";;; End:\n") (write-file (expand-file-name recentf-save-file)) nil) (error *************** *** 1207,1212 **** (provide 'recentf) (run-hooks 'recentf-load-hook) ! ;;; arch-tag: 78f1eec9-0d16-4d19-a4eb-2e4529edb62a ;;; recentf.el ends here --- 1217,1222 ---- (provide 'recentf) (run-hooks 'recentf-load-hook) ! ;;; arch-tag: 78f1eec9-0d16-4d19-a4eb-2e4529edb62a ;;; recentf.el ends here