elisp マシン毎に設定を切り替える マシン毎に設定を切り替える場合，関数 system-name を利用して実行中のマシンの名前を調べることが出来ます．以下の例では， system-name の返り値が，host.domain.or.jp となる場合と，単に host となる場合があるので，どちらにも対応させるために正規表現を使っています． (let ((system-name (system-name))) (cond ;; systemA または systemB で実行中の場合 ((string-match "^\\(systemA\\|systemB\\)\\(\\..+\\)*$" system-name) (load "~/.emacs-AorB")) ;; systemC で実行中の場合 ((string-match "^systemC\\(\\..+\\)*$" system-name) (load "~/.emacs-C")) ;; 指定されていないマシンで実行中の場合 (t (message (concat "Unknown Host: " system-name)))))
Del
Today
/
All