source: projects/vskel/trunk/.emacs @ 1126

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;  FSF Emacs 20/21/22, XEmacs 用ユーザ設定ファイル
;;    Munehiro Yamamoto <munepi@cg8.so-net.ne.jp>
;;      $Id: .emacs,v 1.5 2009/04/20 18:32:24 daisuke Exp $     
;;    
;;    based on
;;    MATSUBAYASHI 'Shaolin' Kohji (shaolin@vinelinux.org)
;;         Irokawa '烈風戦士' Hiroaki (irorin@terra.dti.ne.jp)
;;                         Time-stamp: <2009-04-05 10:32:43 munepi>
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;;; !!! 注意 !!!
;; このユーザ設定ファイルは、旧版（obsolete）です。
;; 
;; - Emacs 23 は起動時に .emacs を読まずに、.emacs.el を読みます。
;; - Emacs 22 は起動時に .emacs と .emacs.el があると、
;;   .emacs.el を優先して読みます。

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;  Emacs 20/21/22 か XEmacs かの判定
;;  ここで Emacs 20/21/22 用、XEmacs 用の設定ファイルを切替えます。
;;
;;  ~/.emacs21.el  -  Emacs 20/21 用設定ファイル
;;  ~/.emacs22.el  -  Emacs 22 用設定ファイル
;;  ~/.xemacs.el -  XEmacs-21.1 用設定ファイル
;;  ~/.xemacs/init.el -  XEmacs 用設定ファイル

(if (string-match "XEmacs" emacs-version)
  ;;; XEmacs のバージョン判定
  (progn
    (if (string-match "21.1" emacs-version)
        (load (expand-file-name "~/.xemacs.el") nil t nil)
      (load (expand-file-name "~/.xemacs/init.el") nil t nil)})
    )
  ;;; FSF Emacs のバージョン判定
  (progn
    (cond 
     ((string-match "^21\." emacs-version)
      (load (expand-file-name "~/.emacs21.el") nil t nil))
     ((string-match "^22\." emacs-version)
      (load (expand-file-name "~/.emacs22.el") nil t nil))
;;; 以下のように Emacs 23 用の設定ファイルを指定しても無効です。
;;      ((string-match "^23\." emacs-version)
;;       (load (expand-file-name "~/.emacs23.el") nil t nil))
     )
    )
  )
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;; Local Variables:
;; mode: emacs-lisp
;; End: