summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorPhilipp Stephani <phst@google.com>2017-12-09 22:03:31 +0100
committerPhilipp Stephani <phst@google.com>2017-12-09 22:03:31 +0100
commitac6ea598302cd33014880a7a5f43d42a7e5d1f01 (patch)
treed31c04473433cdf7942b6bc3cb51f2945febab8b
parent8b8197235f058276823832eadce66e2de2f9a9cf (diff)
downloademacs-ac6ea598302cd33014880a7a5f43d42a7e5d1f01.tar.gz
* lisp/emacs-lisp/advice.el: Stop using old-style backquotes
-rw-r--r--lisp/emacs-lisp/advice.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/emacs-lisp/advice.el b/lisp/emacs-lisp/advice.el
index 82867667756..d5da30fb18c 100644
--- a/lisp/emacs-lisp/advice.el
+++ b/lisp/emacs-lisp/advice.el
@@ -1514,7 +1514,7 @@
;; `ad-return-value' in a piece of after advice. For example:
;;
;; (defmacro foom (x)
-;; (` (list (, x))))
+;; `(list ,x))
;; foom
;;
;; (foom '(a))
@@ -1547,8 +1547,8 @@
;; (defadvice foom (after fg-print-x act)
;; "Print the value of X."
;; (setq ad-return-value
-;; (` (progn (print (, x))
-;; (, ad-return-value)))))
+;; `(progn (print ,x)
+;; ,ad-return-value)))
;; foom
;;
;; (macroexpand '(foom '(a)))