From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/53909 Path: main.gmane.org!not-for-mail From: Katsumi Yamaoka Newsgroups: gmane.emacs.gnus.general Subject: Re: non-ascii chars in the Lisp source files Date: Fri, 05 Sep 2003 21:26:27 +0900 Organization: Emacsen advocacy group Sender: ding-owner@lists.math.uh.edu Message-ID: References: NNTP-Posting-Host: deer.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: sea.gmane.org 1062764862 26261 80.91.224.253 (5 Sep 2003 12:27:42 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Fri, 5 Sep 2003 12:27:42 +0000 (UTC) Original-X-From: ding-owner+M2449@lists.math.uh.edu Fri Sep 05 14:27:39 2003 Return-path: Original-Received: from malifon.math.uh.edu ([129.7.128.13]) by deer.gmane.org with esmtp (Exim 3.35 #1 (Debian)) id 19vFgh-0004Gh-00 for ; Fri, 05 Sep 2003 14:27:39 +0200 Original-Received: from localhost ([127.0.0.1] helo=lists.math.uh.edu) by malifon.math.uh.edu with smtp (Exim 3.20 #1) id 19vFgU-00081G-00; Fri, 05 Sep 2003 07:27:26 -0500 Original-Received: from sclp3.sclp.com ([64.157.176.121]) by malifon.math.uh.edu with smtp (Exim 3.20 #1) id 19vFgQ-00081B-00 for ding@lists.math.uh.edu; Fri, 05 Sep 2003 07:27:23 -0500 Original-Received: (qmail 23710 invoked by alias); 5 Sep 2003 12:27:22 -0000 Original-Received: (qmail 23704 invoked from network); 5 Sep 2003 12:27:22 -0000 Original-Received: from minsk.servershost.net (HELO minsk.hostforweb.net) (69.61.9.140) by sclp3.sclp.com with SMTP; 5 Sep 2003 12:27:22 -0000 Original-Received: from yamaokac by minsk.hostforweb.net with local (Exim 4.20) id 19vFgP-0008Kc-Uy for ding@gnus.org; Fri, 05 Sep 2003 08:27:22 -0400 Original-To: ding@gnus.org X-Face: #kKnN,xUnmKia.'[pp`;Omh}odZK)?7wQSl"4o04=EixTF+V[""w~iNbM9ZL+.b*_CxUmFk B#Fu[*?MZZH@IkN:!"\w%I_zt>[$nm7nQosZ<3eu;B:$Q_:p!',P.c0-_Cy[dz4oIpw0ESA^D*1Lw= L&i*6&( User-Agent: Gnus/5.1003 (Gnus v5.10.3) XEmacs/21.4 (Reasonable Discussion, linux) Cancel-Lock: sha1:H37QwqpFdhiufMBgtf8KA58Z8Fk= X-Payment: hashcash 1.2 0:030905:ding@gnus.org:2b23eb79a3119fbe X-Hashcash: 0:030905:ding@gnus.org:2b23eb79a3119fbe X-AntiAbuse: This header was added to track abuse, please include it with any abuse report X-AntiAbuse: Primary Hostname - minsk.hostforweb.net X-AntiAbuse: Original Domain - gnus.org X-AntiAbuse: Originator/Caller UID/GID - [32531 32531] / [47 12] X-AntiAbuse: Sender Address Domain - minsk.hostforweb.net Precedence: bulk Xref: main.gmane.org gmane.emacs.gnus.general:53909 X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:53909 >>>>> In Katsumi Yamaoka wrote: > I've confirmed both the latest XEmacs 21.4 and 21.5 don't handle the > coding cookie at the end of a file yet. Here's a quick hack, not tested broadly: (if (featurep 'xemacs) (defadvice hack-one-local-variable (around handle-coding-cookie (var val) activate) "Handle a coding cookie at the Local Variables section." (if (eq var 'coding) (if (and buffer-file-name (symbolp val) (find-coding-system val)) (let ((mod (buffer-modified-p)) (coding-system-for-read val) buffer-read-only) (insert-file-contents buffer-file-name nil nil nil t) (setq buffer-file-coding-system val) (set-buffer-modified-p mod))) ad-do-it))) It can also be used in dgnushack.el in order to build correct elc files even in Japanese language environment. I don't want to put it into dgnushack.el actually, though. -- Katsumi Yamaoka