69 lines
2.7 KiB
EmacsLisp
69 lines
2.7 KiB
EmacsLisp
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||
;; CUI GUIで切り替え;;;;;;;;;;;;;;;;;;;;;;;
|
||
(if (not window-system) (progn
|
||
;; ←CUI用設定を、ここに記述;;;;;;;;;;;;;;;;
|
||
;; 現在の行番号ハイライト
|
||
(require 'hlinum)
|
||
(hlinum-activate)
|
||
(set-face-foreground 'linum-highlight-face "gray10")
|
||
(set-face-background 'linum-highlight-face "SteelBlue4")
|
||
;;インデントのビジュアル化
|
||
(require 'highlight-indentation)
|
||
(highlight-indentation-mode t)
|
||
'((t :background "midnight blue"))
|
||
(set-face-background 'highlight-indentation-face "gray15") ; 18/235 235=gray15
|
||
(set-face-background 'highlight-indentation-current-column-face "gray30")
|
||
;;現在行の強調
|
||
(global-hl-line-mode t)
|
||
(custom-set-faces
|
||
'(hl-line ((t (:background "gray20"))))) ;color-234/17/20
|
||
(custom-set-variables
|
||
'(beacon-mode t)
|
||
'(beacon-color "brightwhite")
|
||
'(beacon-blink-when-focused t) )
|
||
;;バックグラウンドカラー
|
||
;(set-face-background 'default "color-233") ;17/234
|
||
(set-face-foreground 'region "black")
|
||
(set-face-background 'region "dim gray")
|
||
;;modeline
|
||
(set-face-background 'mode-line "#5f00d7") ;"navy");"slateblue3") ;"purple")
|
||
;(set-face-background 'mode-line "color-53");;54;55;56;57
|
||
(set-face-background 'mode-line-inactive "midnight blue") ;;54;55;56;57
|
||
));;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||
|
||
(if window-system (progn
|
||
;; ←GUI用設定を、ここに記述;;;;;;;;;;;;;;
|
||
(require 'hlinum)
|
||
(hlinum-activate)
|
||
;(set-face-foreground 'linum-highlight-face "gray10")
|
||
;(set-face-background 'linum-highlight-face "SteelBlue4")
|
||
;;インデントのビジュアル化
|
||
(require 'highlight-indentation)
|
||
(highlight-indentation-mode t)
|
||
'((t :background "midnight blue"))
|
||
(set-face-background 'highlight-indentation-face "gray14")
|
||
;(set-face-background 'highlight-indentation-current-column-face "gray30")
|
||
;;現在行の強調
|
||
(global-hl-line-mode t)
|
||
(custom-set-faces
|
||
'(hl-line ((t (:background "gray18")))) ;gray18;17
|
||
)
|
||
(custom-set-variables
|
||
'(beacon-mode t)
|
||
'(beacon-color "LavenderBlush1")
|
||
'(beacon-blink-when-focused t) )
|
||
;;バックグラウンドカラー
|
||
;(set-face-background 'default "color-235")
|
||
(set-face-foreground 'region "black")
|
||
(set-face-background 'region "dim gray")
|
||
;;modeline
|
||
(set-face-background 'mode-line "Dark Slate Blue") ;"gray24") ;dark slate blue")
|
||
(set-face-background 'mode-line-inactive "midnight blue")
|
||
));;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||
(custom-set-faces
|
||
;; custom-set-faces was added by Custom.
|
||
;; If you edit it by hand, you could mess it up, so be careful.
|
||
;; Your init file should contain only one such instance.
|
||
;; If there is more than one, they won't work right.
|
||
'(hl-line ((t (:background "gray20")))))
|