diff options
author | Philipp Stephani <phst@google.com> | 2017-12-09 22:03:31 +0100 |
---|---|---|
committer | Philipp Stephani <phst@google.com> | 2017-12-09 22:03:31 +0100 |
commit | ac6ea598302cd33014880a7a5f43d42a7e5d1f01 (patch) | |
tree | d31c04473433cdf7942b6bc3cb51f2945febab8b | |
parent | 8b8197235f058276823832eadce66e2de2f9a9cf (diff) | |
download | emacs-ac6ea598302cd33014880a7a5f43d42a7e5d1f01.tar.gz |
* lisp/emacs-lisp/advice.el: Stop using old-style backquotes
-rw-r--r-- | lisp/emacs-lisp/advice.el | 6 |
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))) |