[nongnu] elpa/with-editor 4f06aba 102/140: with-editor-usage-message: Cosmetics

[Jonas Bernoulli]

branch: elpa/with-editor
commit 4f06aba28fb87f991ec7f2126d6752b1f491eda8
Author: Jonas Bernoulli <jonas@bernoul.li>
Commit: Jonas Bernoulli <jonas@bernoul.li>

    with-editor-usage-message: Cosmetics
---
 with-editor.el | 11 ++++++-----
 1 file changed, 6 insertions(+), 5 deletions(-)

diff --git a/with-editor.el b/with-editor.el
index f8f4da8..398e293 100644
--- a/with-editor.el
+++ b/with-editor.el
@@ -447,11 +447,12 @@ or \\[with-editor-cancel] to cancel")
 (defun with-editor-usage-message ()
   ;; Run after `server-execute', which is run using
   ;; a timer which starts immediately.
-  (run-with-timer
-   0.05 nil
-   `(lambda ()
-      (with-current-buffer ,(current-buffer)
-        (message (substitute-command-keys with-editor-usage-message))))))
+  (let ((buffer (current-buffer)))
+    (run-with-timer
+     0.05 nil
+     (lambda ()
+       (with-current-buffer buffer
+         (message (substitute-command-keys with-editor-usage-message)))))))
 
 ;;; Wrappers