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: po file charset via auto-coding-functions Date: Mon, 24 Oct 2005 14:19:11 +0900 Message-ID: References: <87zmp399ue.fsf@zip.com.au> <87ll0ma3ow.fsf@zip.com.au> <87zmp1f9np.fsf@zip.com.au> <87mzkz3c23.fsf@zip.com.au> 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 1130131230 29210 80.91.229.2 (24 Oct 2005 05:20:30 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Mon, 24 Oct 2005 05:20:30 +0000 (UTC) Cc: emacs-devel@gnu.org Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Mon Oct 24 07:20:21 2005 Return-path: Original-Received: from lists.gnu.org ([199.232.76.165]) by ciao.gmane.org with esmtp (Exim 4.43) id 1ETuk7-0007Nb-RO for ged-emacs-devel@m.gmane.org; Mon, 24 Oct 2005 07:19:32 +0200 Original-Received: from localhost ([127.0.0.1] helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1ETuk7-0000L1-7i for ged-emacs-devel@m.gmane.org; Mon, 24 Oct 2005 01:19:31 -0400 Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1ETujv-0000Iy-PH for emacs-devel@gnu.org; Mon, 24 Oct 2005 01:19:19 -0400 Original-Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1ETujt-0000H4-TO for emacs-devel@gnu.org; Mon, 24 Oct 2005 01:19:19 -0400 Original-Received: from [199.232.76.173] (helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1ETujt-0000Gt-OO for emacs-devel@gnu.org; Mon, 24 Oct 2005 01:19:17 -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 1ETujt-00051B-Ev for emacs-devel@gnu.org; Mon, 24 Oct 2005 01:19:17 -0400 Original-Received: from nfs.m17n.org (nfs.m17n.org [192.47.44.7]) by tsukuba.m17n.org (8.13.4/8.13.4/Debian-3) with ESMTP id j9O5JD5J027407; Mon, 24 Oct 2005 14:19:13 +0900 Original-Received: from etlken (etlken.m17n.org [192.47.44.125]) by nfs.m17n.org (8.13.4/8.13.4/Debian-3) with ESMTP id j9O5JCGH028970; Mon, 24 Oct 2005 14:19:13 +0900 Original-Received: from handa by etlken with local (Exim 3.36 #1 (Debian)) id 1ETujn-0001Im-00; Mon, 24 Oct 2005 14:19:11 +0900 Original-To: Kevin Ryde In-reply-to: <87mzkz3c23.fsf@zip.com.au> (message from Kevin Ryde on Mon, 24 Oct 2005 12:04:36 +1000) User-Agent: SEMI/1.14.3 (Ushinoya) FLIM/1.14.2 (Yagi-Nishiguchi) APEL/10.2 Emacs/22.0.50 (i686-pc-linux-gnu) 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:44677 Archived-At: In article <87mzkz3c23.fsf@zip.com.au>, Kevin Ryde writes: > Kenichi Handa writes: >> >> But, it seems that the current po.el doesn't do that but expects >> that it is called only on PO file. > Yes, that's so. That's why I tightened it up with a looking-at to > demand a msgid "" + msgstr "", then the "Content-Type" in that header > block. It's always possible a non-po file could start that way, but > it should be unlikely. I see. >> especially when we can fix the problem by the other method (as in my >> previous mail). > I think jka-compr is also affected, try visiting a compressed > vi.po.gz. It seems that this additional patch will fix it. But I admit that that this change is rather tricky compared with the previous ones. :-( *** jka-compr.el 08 Aug 2005 10:13:24 +0900 1.87 --- jka-compr.el 24 Oct 2005 11:38:27 +0900 *************** *** 500,509 **** (delete-file local-copy))) (unless notfound (decode-coding-inserted-region (point) (+ (point) size) ! (jka-compr-byte-compiler-base-file-name file) ! visit beg end replace)) (and visit --- 500,513 ---- (delete-file local-copy))) (unless notfound + (let ((buffer-file-name + (concat file "!" + (jka-compr-byte-compiler-base-file-name file)))) + (decode-coding-inserted-region (point) (+ (point) size) ! buffer-file-name ! visit beg end replace))) (and visit --- Kenichi Handa handa@m17n.org