From 878334c9a81af35c77d92cd70bc9325afce39f6b Mon Sep 17 00:00:00 2001 From: Case Duckworth Date: Sun, 4 Apr 2021 23:10:37 -0500 Subject: Fix acdw/reading-mode Mismatched parens --- lisp/acdw.el | 40 ++++++++++++++++++++-------------------- 1 file changed, 20 insertions(+), 20 deletions(-) diff --git a/lisp/acdw.el b/lisp/acdw.el index 4fea896..79d5c70 100644 --- a/lisp/acdw.el +++ b/lisp/acdw.el @@ -124,28 +124,28 @@ directory." 'face '(:inherit italic)) fmt)))) ;; modes to disable - (dolist (mode '(display-fill-column-indicator-mode) - (when (fboundp mode) - (funcall mode -1))) - ;; modes to enable - (dolist (mode '(iscroll-mode - olivetti-mode)) - (when (fboundp mode) - (funcall mode +1)))) - ;; turn off - ;; settings - (kill-local-variable 'mode-line-format) - ;; modes to re-enable - (dolist (mode '(display-fill-column-indicator-mode - simple-modeline-mode)) - (when (fboundp mode) - (funcall mode +1))) - ;; modes to re-disable - (dolist (mode '(olivetti-mode - iscroll-mode)) + (dolist (mode '(display-fill-column-indicator-mode)) (when (fboundp mode) (funcall mode -1))) - (force-mode-line-update)))) + ;; modes to enable + (dolist (mode '(iscroll-mode + olivetti-mode)) + (when (fboundp mode) + (funcall mode +1)))) + ;; turn off + ;; settings + (kill-local-variable 'mode-line-format) + ;; modes to re-enable + (dolist (mode '(display-fill-column-indicator-mode + simple-modeline-mode)) + (when (fboundp mode) + (funcall mode +1))) + ;; modes to re-disable + (dolist (mode '(olivetti-mode + iscroll-mode)) + (when (fboundp mode) + (funcall mode -1))) + (force-mode-line-update))) ;;; Keymap & Mode -- cgit 1.4.1-21-gabe81