From 2fe456f9c15768250f545879fde62ade1b2af56a Mon Sep 17 00:00:00 2001 From: Paul Nelson Date: Wed, 2 Apr 2025 15:19:19 +0200 Subject: 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 1951039..153d65a 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)))))) -- cgit v1.0