about summary refs log tree commit diff stats
path: root/lisp
diff options
context:
space:
mode:
authorCase Duckworth2021-09-30 18:23:15 -0500
committerCase Duckworth2021-09-30 18:23:15 -0500
commit4873990a706339cb47e0ec6a2954d2b2e8041b69 (patch)
treefdfcff81d2118a6bfc9bbb0f24e65c0e20f6e6b2 /lisp
parentUpdate org-mode recipe (diff)
downloademacs-4873990a706339cb47e0ec6a2954d2b2e8041b69.tar.gz
emacs-4873990a706339cb47e0ec6a2954d2b2e8041b69.zip
Fix bug in acdw-reading.el
Diffstat (limited to 'lisp')
-rw-r--r--lisp/acdw-reading.el6
1 files changed, 4 insertions, 2 deletions
diff --git a/lisp/acdw-reading.el b/lisp/acdw-reading.el index 5d43dac..e3d5716 100644 --- a/lisp/acdw-reading.el +++ b/lisp/acdw-reading.el
@@ -39,14 +39,16 @@
39 (when (fboundp mode) 39 (when (fboundp mode)
40 (set (make-local-variable 40 (set (make-local-variable
41 (intern (format "//%s" mode))) 41 (intern (format "//%s" mode)))
42 (symbol-value mode)) 42 (and (boundp mode)
43 (symbol-value mode)))
43 (funcall mode -1))) 44 (funcall mode -1)))
44 ;; enable modes 45 ;; enable modes
45 (dolist (mode '(olivetti-mode)) 46 (dolist (mode '(olivetti-mode))
46 (when (fboundp mode) 47 (when (fboundp mode)
47 (set (make-local-variable 48 (set (make-local-variable
48 (intern (format "//%s" mode))) 49 (intern (format "//%s" mode)))
49 (symbol-value mode)) 50 (and (boundp mode)
51 (symbol-value mode)))
50 (funcall mode +1)))) 52 (funcall mode +1))))
51 ;; turn off 53 ;; turn off
52 ;; restore settings 54 ;; restore settings