jimeh/.emacs.d
1
0
Fork 0
mirror of https://github.com/jimeh/.emacs.d.git synced 2026-02-19 13:46:41 +00:00
Code Issues Packages Projects Releases Wiki Activity

feat(editor): Support Emacs 27's native fill-column-indicator

Browse Source
This commit is contained in:
Jim Myhrberg
2020-01-26 22:50:07 +00:00
parent a0a72bddc5
commit 464757740e
6 changed files with 42 additions and 9 deletions
Download Patch File Download Diff File Expand all files Collapse all files

26
modules/editor/siren-display-fill-column.el
View File

@@ -6,12 +6,30 @@
;;; Code:
(require 'siren-fci)
;; Emacs 27.x and later: Use native display-fill-column-indicator
(when (not (version< emacs-version "27.0"))
(use-package display-fill-column-indicator
:ensure nil ;; loaded from emacs built-ins
(defun siren-display-fill-column (&optional arg)
"Activate or deactivate visual fill column.
:hook
(prog-mode . display-fill-column-indicator-mode)
:custom
(display-fill-column-indicator-character ?\u2502))
(defun siren-display-fill-column (&optional arg)
"Activate or deactivate visual fill column.
Optional ARG is passed directly to mode toggle function."
(fci-mode (or arg t)))
(display-fill-column-indicator-mode arg)))
;; Emacs 26.x: Use fill-column-indicator package
(when (version< emacs-version "27.0")
(require 'siren-fci)
(defun siren-display-fill-column (&optional arg)
"Activate or deactivate visual fill column.
Optional ARG is passed directly to mode toggle function."
(fci-mode (or arg t))))
(provide 'siren-display-fill-column)
;;; siren-display-fill-column.el ends here