瀏覽代碼

Set gutter color

master
10sr 6 年之前
父節點
當前提交
60f06c8bcb
簽署人: 10sr GPG Key ID: 7BEC428194130EB2
共有 1 個文件被更改,包括 12 次插入3 次删除
  1. +12
    -3
      emacs.el

+ 12
- 3
emacs.el 查看文件

@@ -1,6 +1,6 @@
;;; emacs.el --- 10sr emacs initialization

;; Time-stamp: <2018-10-18 14:50:11 JST 10sr>
;; Time-stamp: <2018-10-18 15:11:27 JST 10sr>

;;; Code:

@@ -394,6 +394,15 @@ found, otherwise returns nil."
(when (safe-require-or-eval 'git-gutter)
(custom-set-variables
'(git-gutter:update-interval 2))
(custom-set-variables
'(git-gutter:unchanged-sign " "))
(when (= (display-color-cells)
256)
(let ((c "color-233"))
(set-face-background 'git-gutter:modified c)
(set-face-background 'git-gutter:added c)
(set-face-background 'git-gutter:deleted c)
(set-face-background 'git-gutter:unchanged c)))
(global-git-gutter-mode 1)
)

@@ -632,8 +641,8 @@ found, otherwise returns nil."
(add-hook 'dired-mode-hook
(lambda ()
(set (make-local-variable 'whitespace-style) nil)))
(if (eq (display-color-cells)
256)
(if (= (display-color-cells)
256)
(set-face-foreground 'whitespace-newline "color-109")
;; (progn
;; (set-face-bold-p 'whitespace-newline


Loading…
取消
儲存