emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Fix #4035: fill-column toggle

Browse source
This commit is contained in:
Henrik Lissner 2020-10-06 13:30:06 -04:00
parent 2f57386aa0
commit 729e8d8f39
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
2 changed files with 8 additions and 9 deletions
Download patch file Download diff file Expand all files Collapse all files

15
modules/ui/fill-column/autoload.el
View file

@ -1,15 +1,14 @@
;;; ui/fill-column/autoload.el -*- lexical-binding: t; -*-
;;;###autoload (autoload 'hl-fill-column-mode "hl-fill-column" nil t)
;;;###autoload
(defalias '+fill-column/toggle
(if (fboundp 'display-fill-column-indicator-mode)
#'display-fill-column-indicator-mode ; Emacs 27 only
(autoload 'hl-fill-column-mode "hl-fill-column" nil t)
#'hl-fill-column-mode))
;;;###autoload
;; Emacs 27 introduced `display-fill-column-indicator-mode' which should be
;; used instead of `hl-fill-column-mode'
(defun +fill-column-enable-h (&optional arg)
(interactive "p")
(if (fboundp 'display-fill-column-indicator-mode)
(display-fill-column-indicator-mode arg)
(hl-fill-column-mode arg)))
(defalias '+fill-column-enable-h #'+fill-column/toggle)
;;;###autoload
(add-hook! '(text-mode-hook prog-mode-hook conf-mode-hook)