--- a/.emacs-my Tue Mar 31 14:35:29 2015 +0300
+++ b/.emacs-my Wed Apr 01 14:53:04 2015 +0300
@@ -760,10 +760,15 @@
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(message "highlighting current line")
+(defun my-hl-line-range-function ()
+ (cons (line-end-position) (line-beginning-position 2)))
+(setq hl-line-range-function #'my-hl-line-range-function)
+
(when window-system
- (custom-set-faces '(hl-line ((t (:inherit highlight :background "light yellow")))))
- (global-hl-line-mode 1)
- )
+ (require 'hl-line)
+ (set-face-attribute 'hl-line nil :inherit nil :background "light yellow")
+ (setq global-hl-line-sticky-flag t)
+ (global-hl-line-mode 1))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(message "paren, braces")