画像1：環境設定を変更したemacs23の画面
;; ;;; ユーザーの初期設定ファイルの指定
;; (setq user-init-file "~/.emacs.el")
;; (setq custom-file "~/.emacs-custom.el")
;; ;;; マクロサーチパスの追加
;; ;;; ~/lib/emacs 以下にユーザ用の *.el, *.elc を置くことができます
;; (setq load-path (append '("~/lib/emacs") load-path))
;;; 以下、オプションにて手作業で加えた部分
;;; スクロールバーを右側に表示する
(set-scroll-bar-mode 'right)
;;; 時刻を表示する
(display-time)
;;; 行番号を表示する
(line-number-mode t)
;;; 起動時の画面はいらない
(setq inhibit-startup-message t)
;;; anthyをロード(anthy-elをインストールする必要あり)
;(load-library "anthy")
;(setq default-input-method "japanese-anthy")
;(if (>= emacs-major-version 23)
; (setq anthy-accept-timeout 1))
;;; 全角/半角キーで日本語入力できるようにする
(global-set-key [zenkaku-hankaku] 'toggle-input-method)
;;; ファイルオープン時に、ファイルダイアログを表示させずに、
;;; ミニバッファにて入力できるようにする
(setq use-file-dialog nil)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; X 版 Emacs のフォント/カラー設定
;; .emacs-faces.el, .emacs-fontset.el 参照
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(load "~/.emacs-faces.el")
;;; オプションにて手作業で加えた部分ここまで
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; （旧版）ユーザ用初期化ファイル
;; ~/.emacs.my.el に個人用設定を書けます。
;; このファイルを直接いじりたくない場合は、個人設定を分離してください。
;; (if (file-exists-p (expand-file-name "~/.emacs.my.el"))
;; (load (expand-file-name "~/.emacs.my.el") nil t nil))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Local Variables:
;; mode: emacs-lisp
;; End:
参考までに、上記設定を反映した.emacs.elを用意しましたので、こちらからダウンロードしてご使用ください。
;; デフォルトのフォントセットなど
(if (or (and window-system (>= emacs-major-version 19))
(>= emacs-major-version 21))
(progn
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; フォント/ウィンドウサイズの設定
(if window-system
(progn
;(load "~/.emacs-fontset.el")
(setq default-frame-alist
(append
;'((font . "fontset-14") ;; デフォルトフォントセット
; (width . 80) (height . 40) ;; ウィンドウサイズ
; )
default-frame-alist))))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; font-lock-mode
;; 色をつける
(global-font-lock-mode t)
;; font-lockでの装飾レベル
(setq font-lock-maximum-decoration t)
(setq fast-lock nil)
(setq lazy-lock nil)
(setq jit-lock t)
;; hilit19 の設定
;; 背景色が明るい色
;;(setq hilit-background-mode 'light)
;; 背景色が暗い色
(setq hilit-background-mode 'dark)
;; hilit19 の読み込み
;(require 'hilit19)
;(set-background-color "grey80") ;; 明るい背景色(Emacs20)
;(set-face-background 'default "grey80") ;; 明るい背景色
;(set-face-foreground 'default "black") ;; 暗い文字色
(set-background-color "#333366") ;; 標準の背景色(Emacs20)
(set-face-background 'default "#333366") ;; 標準の背景色
(set-face-foreground 'default "white") ;; 標準の文字色
(if (and window-system (>= emacs-major-version 21))
(progn
(set-face-background 'menu "grey94") ;; メニュー
(set-face-background 'tool-bar "grey94") ;; ツールバー
(set-face-background 'mode-line "grey94") ;; モードライン
(set-face-background 'scroll-bar "grey94") ;; スクロールバー
(set-face-foreground 'tooltip "black") ;; ツールチップ
(set-face-background 'tooltip "ghostwhite") ;; ツールチップ
))
(set-cursor-color "white")
(if (not window-system)
(progn
;; 非X環境での色設定
(set-face-background 'default "000000")
(set-face-foreground 'default "ffffff")))
)
参考までに、上記設定を反映した.emacs-faces.elを用意しましたので、こちらからダウンロードしてご使用ください。
