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: Usage of standard-display-table in MSDOS Date: Thu, 02 Sep 2010 14:20:42 +0900 Message-ID: References: <83aao8mjzx.fsf@gnu.org> <837hjcm9cw.fsf@gnu.org> <83y6brkxqe.fsf@gnu.org> <201009012333.o81NXrRq016732@beta.mvs.co.il> NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: dough.gmane.org 1283404872 28087 80.91.229.12 (2 Sep 2010 05:21:12 GMT) X-Complaints-To: usenet@dough.gmane.org NNTP-Posting-Date: Thu, 2 Sep 2010 05:21:12 +0000 (UTC) Cc: eliz@gnu.org, emacs-devel@gnu.org To: ehud@unix.mvs.co.il Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Thu Sep 02 07:21:10 2010 Return-path: Envelope-to: ged-emacs-devel@m.gmane.org Original-Received: from lists.gnu.org ([199.232.76.165]) by lo.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1Or2ET-0005o6-PH for ged-emacs-devel@m.gmane.org; Thu, 02 Sep 2010 07:21:06 +0200 Original-Received: from localhost ([127.0.0.1]:51711 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1Or2ET-0001zr-2n for ged-emacs-devel@m.gmane.org; Thu, 02 Sep 2010 01:21:05 -0400 Original-Received: from [140.186.70.92] (port=38285 helo=eggs.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1Or2EE-0001x0-Hf for emacs-devel@gnu.org; Thu, 02 Sep 2010 01:20:55 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.69) (envelope-from ) id 1Or2ED-0002qt-H5 for emacs-devel@gnu.org; Thu, 02 Sep 2010 01:20:50 -0400 Original-Received: from mx1.aist.go.jp ([150.29.246.133]:63101) by eggs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1Or2EB-0002pq-1w; Thu, 02 Sep 2010 01:20:47 -0400 Original-Received: from rqsmtp1.aist.go.jp (rqsmtp1.aist.go.jp [150.29.254.115]) by mx1.aist.go.jp with ESMTP id o825KhtW025950; Thu, 2 Sep 2010 14:20:43 +0900 (JST) env-from (handa@m17n.org) Original-Received: from smtp1.aist.go.jp by rqsmtp1.aist.go.jp with ESMTP id o825KhbB015097; Thu, 2 Sep 2010 14:20:43 +0900 (JST) env-from (handa@m17n.org) Original-Received: by smtp1.aist.go.jp with ESMTP id o825Khat009075; Thu, 2 Sep 2010 14:20:43 +0900 (JST) env-from (handa@m17n.org) Original-Received: from handa by etlken with local (Exim 4.71) (envelope-from ) id 1Or2E7-0004Wl-32; Thu, 02 Sep 2010 14:20:43 +0900 In-Reply-To: <201009012333.o81NXrRq016732@beta.mvs.co.il> (ehud@unix.mvs.co.il) X-detected-operating-system: by eggs.gnu.org: Solaris 9 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:129572 Archived-At: In article <201009012333.o81NXrRq016732@beta.mvs.co.il>, "Ehud Karni" writes: As for Problem 1, I'll reply later. > Problem 2: > When I use `find-file-literally' to visit a file, My change was to make (standard-display-8bit 128 255) work as Emacs 21 for a unibyte buffer; i.e. when you visit a file by specifying no-conversion coding-system or by using find-file-literally. > I attach a tar.bz2 file containing the following files: > 1. test-heb.el - 2 functions: `display-hebrew' sets the display table. > `chars-list' - show characters #x20-#xFF. Please try the attached version of chars-list without any other display-table setting. Does it work? --- Kenichi Handa handa@m17n.org ;; -*- mode: emacs-lisp; coding: hebrew-iso-8bit-unix -*- (defun chars-list () "display all characters in range 0x20-0xFF" (interactive) (let ((svbuf (get-buffer-create "*Help*")) (ch 32)) (with-current-buffer svbuf (erase-buffer) ;; Make this a unibyte buffer. (set-buffer-multibyte nil) ;; Make all 8-bit bytes (0x80..0xFF) displayed literally. (standard-display-8bit 128 255) (insert " List of all displayable characters:\n\n") (while (< ch 88) (let ((c ch)) (while (< c 256) (insert (format " [%c]=%3dD,%3oO,%2xX" c c c c)) (setq c (+ c 56)) (if (< c 256) (insert " ")))) (insert "\n") (setq ch (1+ ch))) (goto-char (point-min))) (pop-to-buffer svbuf)))