Fix unloading the hl-line library
* lisp/hl-line.el (hl-line-unload-function): Restore function.
This commit is contained in:
@@ -127,6 +127,16 @@ Currently used in calendar/todo-mode."
|
||||
(let (inhibit-quit)
|
||||
(hl-line-mode 1))))
|
||||
|
||||
(defun hl-line-unload-function ()
|
||||
"Unload the Hl-Line library."
|
||||
(global-hl-line-mode -1)
|
||||
(save-current-buffer
|
||||
(dolist (buffer (buffer-list))
|
||||
(set-buffer buffer)
|
||||
(when hl-line-mode (hl-line-mode -1))))
|
||||
;; continue standard unloading
|
||||
nil)
|
||||
|
||||
;;;###autoload
|
||||
(define-globalized-minor-mode global-hl-line-mode
|
||||
hl-line-mode hl-line-turn-on
|
||||
|
||||
Reference in New Issue
Block a user