Browse Source

WIP experimental fix of hl-line

pull/15/head
10sr 9 years ago
parent
commit
fc2c314f83
1 changed files with 11 additions and 3 deletions
  1. +11
    -3
      emacs.el

+ 11
- 3
emacs.el View File

@@ -739,9 +739,17 @@ IF OK-IF-ALREADY-EXISTS is true force download."
"*Face used by hl-line."
:group '10sr)
(global-hl-line-mode 1) ;; (hl-line-mode 1)
(set-face-underline 'hl-line t)
(set-face-background 'hl-line "unspecified-bg")
(set-face-foreground 'hl-line "unspecified-fg")
(if (< (display-color-cells)
256)
;; 8 colors
(progn
(set-face-underline 'hl-line t)
(set-face-background 'hl-line "unspecified-bg")
(set-face-foreground 'hl-line "unspecified-fg"))
;; 256 colors
(set-face-background 'hl-line "color-235")
;;(set-face-foreground 'hl-line "unspecified-fg")
)
;; (set-variable 'hl-line-face '10sr-hl-line) ;; (setq hl-line-face nil)
(set-variable 'hl-line-global-modes
'(not


Loading…
Cancel
Save