Emacs

16進数で色一覧を表示

(defun list-hexadecimal-colors-display () "16進数で色一覧を表示" (interactive) (let ((r 0) (g 0) (b 0) (delta 32) (color-list ())) (while (< r 256) (setq g 0) (while (< g 256) (setq b 0) (while (< b 256) (setq color-list (append color-list (list (format "#%.2x%.2x%.2x" r g b)))) (setq b (+ b delta))) (setq g (+ g delta))) (setq r (+ r delta))) (list-colors-display color-list)))

ある *.el を require しているパッケージを表示。

(require 'loadhist) (file-dependents (feature-file 'cl))

run-at-time()

;;foo() を 2003/10/9 3:12:30 に実行する。 (run-at-time (encode-time 30 12 3 9 10 2003) nil 'foo)

elisp で書かれた Window Manager

(URL: X Emacs Window Manager )

Emacs 年表

(URL: A History of Emacs ) (URL: Emacs Timeline ) (URL: Mule/Emacsの歴史 ) 右上の Mule/Emacs の歴史 -> (左上の)Historical drawing

Emacs Lisp での繰り返しの書き方

繰り返しを書くときは、まず mapcar, find-if などの高階関数で書けるかどうかを検討する。書けなければ dolist, dotimes などを使う。それでも書けなければ、while, loop, 再帰を使う。 ...

list を car しながら loop 処理させる。

(dolist (target '(a b c)) (if (eql 'b target) (return target)))

正規表現を interactive にテストする

M-x re-builder

10進数=>16進数は前者を使った方が安定しているみたい。

(string-to-number "20" 16) #=> 32 (read (concat "?\\x" "20")) #=> 32

シングルクォートで括れば、なんでも実行できるな。

% emacs -q –no-site-file -batch -eval ‘(message (getenv “HOME”))’