[1126] | 1 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
---|
| 2 | ;; FSF Emacs 20/21/22, XEmacs 用ユーザ設定ファイル |
---|
| 3 | ;; Munehiro Yamamoto <munepi@cg8.so-net.ne.jp> |
---|
| 4 | ;; $Id: .emacs,v 1.5 2009/04/20 18:32:24 daisuke Exp $ |
---|
| 5 | ;; |
---|
| 6 | ;; based on |
---|
| 7 | ;; MATSUBAYASHI 'Shaolin' Kohji (shaolin@vinelinux.org) |
---|
| 8 | ;; Irokawa '烈風戦士' Hiroaki (irorin@terra.dti.ne.jp) |
---|
| 9 | ;; Time-stamp: <2009-04-05 10:32:43 munepi> |
---|
| 10 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
---|
| 11 | |
---|
| 12 | ;;; !!! 注意 !!! |
---|
| 13 | ;; このユーザ設定ファイルは、旧版(obsolete)です。 |
---|
| 14 | ;; |
---|
| 15 | ;; - Emacs 23 は起動時に .emacs を読まずに、.emacs.el を読みます。 |
---|
| 16 | ;; - Emacs 22 は起動時に .emacs と .emacs.el があると、 |
---|
| 17 | ;; .emacs.el を優先して読みます。 |
---|
| 18 | |
---|
| 19 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
---|
| 20 | ;; Emacs 20/21/22 か XEmacs かの判定 |
---|
| 21 | ;; ここで Emacs 20/21/22 用、XEmacs 用の設定ファイルを切替えます。 |
---|
| 22 | ;; |
---|
| 23 | ;; ~/.emacs21.el - Emacs 20/21 用設定ファイル |
---|
| 24 | ;; ~/.emacs22.el - Emacs 22 用設定ファイル |
---|
| 25 | ;; ~/.xemacs.el - XEmacs-21.1 用設定ファイル |
---|
| 26 | ;; ~/.xemacs/init.el - XEmacs 用設定ファイル |
---|
| 27 | |
---|
| 28 | (if (string-match "XEmacs" emacs-version) |
---|
| 29 | ;;; XEmacs のバージョン判定 |
---|
| 30 | (progn |
---|
| 31 | (if (string-match "21.1" emacs-version) |
---|
| 32 | (load (expand-file-name "~/.xemacs.el") nil t nil) |
---|
| 33 | (load (expand-file-name "~/.xemacs/init.el") nil t nil)}) |
---|
| 34 | ) |
---|
| 35 | ;;; FSF Emacs のバージョン判定 |
---|
| 36 | (progn |
---|
| 37 | (cond |
---|
| 38 | ((string-match "^21\." emacs-version) |
---|
| 39 | (load (expand-file-name "~/.emacs21.el") nil t nil)) |
---|
| 40 | ((string-match "^22\." emacs-version) |
---|
| 41 | (load (expand-file-name "~/.emacs22.el") nil t nil)) |
---|
| 42 | ;;; 以下のように Emacs 23 用の設定ファイルを指定しても無効です。 |
---|
| 43 | ;; ((string-match "^23\." emacs-version) |
---|
| 44 | ;; (load (expand-file-name "~/.emacs23.el") nil t nil)) |
---|
| 45 | ) |
---|
| 46 | ) |
---|
| 47 | ) |
---|
| 48 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
---|
| 49 | |
---|
| 50 | ;; Local Variables: |
---|
| 51 | ;; mode: emacs-lisp |
---|
| 52 | ;; End: |
---|