|
From: | Thierry Volpiatto |
Subject: | Re: Char code to Emacs string. |
Date: | Wed, 01 Jun 2011 10:30:24 +0200 |
User-agent: | Gnus/5.110018 (No Gnus v0.18) Emacs/23.3.50 (gnu/linux) |
Oleksandr Gavenko <gavenko@bifit.com.ua> writes: > This code not work because 'make-char' do not understand 'unicode' arg > (which intended to print chars with it unicode code): > > (let (i (start ?\x1B6) (end ?\x1B7C)) > (setq i start) > (while (<= i end) > (message "%s - %x" (make-char 'unicode i) i) > (setq i (+ 1 i)) > ) ) > > How I can get list of possible CHARSET for 'make-char' > and how this code must be fixed to work properly? You can use `string' instead of `make-char' #+BEGIN_SRC emacs-lisp (let ((start ?\x1B6) (end ?\x1B7C)) (while (<= start end) (message "%s - %x" (string start) start) (sit-for 0.2) (setq start (+ 1 start)))) #+END_SRC To store in a list:(maybe more useful) #+BEGIN_SRC emacs-lisp (let ((start ?\x1B6) (end ?\x1B7C) result) (while (<= start end) (push (cons (string start) start) result) (setq start (+ 1 start))) (nreverse result)) ;; => (("ƶ" . 438) ("Ʒ" . 439) ("Ƹ" . 440) ("ƹ" . 441)...) #+END_SRC -- A+ Thierry Get my Gnupg key: gpg --keyserver pgp.mit.edu --recv-keys 59F29997
[Prev in Thread] | Current Thread | [Next in Thread] |