branch: externals/doc-view-follow
commit 2fe456f9c15768250f545879fde62ade1b2af56a
Author: Paul Nelson <ultr...@gmail.com>
Commit: Paul Nelson <ultr...@gmail.com>
Fix docstring and use when-let* in doc-follow--manage-advice
* doc-follow.el (doc-follow--manage-advice): Fix quote syntax in
docstring to use Emacs Lisp syntax highlighting properly. Use
when-let* instead of when-let.
---
doc-follow.el | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/doc-follow.el b/doc-follow.el
index 19510397fd..153d65ab12 100644
--- a/doc-follow.el
+++ b/doc-follow.el
@@ -118,11 +118,11 @@ by adding entries to this list.")
windows))))))
(defun doc-follow--manage-advice (add-or-remove)
- "Add or remove advice for all functions in `doc-follow-modes`.
-ADD-OR-REMOVE should be either 'add or 'remove."
+ "Add or remove advice for all functions in `doc-follow-modes'.
+ADD-OR-REMOVE should be either \\='add or \\='remove."
(dolist (mode-entry doc-follow-modes)
(dolist (action '(:goto :next :prev))
- (when-let ((func (plist-get (cdr mode-entry) action)))
+ (when-let* ((func (plist-get (cdr mode-entry) action)))
(if (eq add-or-remove 'add)
(advice-add func :after #'doc-follow--sync-pages)
(advice-remove func #'doc-follow--sync-pages))))))
