Summary
マシン毎に設定を切り替える場合,関数 system-name を利用して実行中のマシンの名前を調べることが可能.(let ((system-name (system-name)))
(cond
;; systemA または systemB で実行中の場合
((string-match "^\\(systemA\\|systemB\\)\\(\\..+\\)*$" system-name)
(load "$HOME/.emacs-AorB"))
;; systemC で実行中の場合
((string-match "^systemC\\(\\..+\\)*$" system-name)
(load "$HOME/.emacs-C"))
;; 指定されていないマシンで実行中の場合
(t
(message (concat "Unknown Host: " system-name)))))
Reference
Namazu.org - Tsuchiya Masatoshi's WEB Site - Emacs Lisp Tipshttp://www.namazu.org/~tsuchiya/elisp/#depend-host