diff options
| author | Philipp Stephani | 2017-12-09 22:03:31 +0100 |
|---|---|---|
| committer | Philipp Stephani | 2017-12-09 22:03:31 +0100 |
| commit | ac6ea598302cd33014880a7a5f43d42a7e5d1f01 (patch) | |
| tree | d31c04473433cdf7942b6bc3cb51f2945febab8b | |
| parent | 8b8197235f058276823832eadce66e2de2f9a9cf (diff) | |
| download | emacs-ac6ea598302cd33014880a7a5f43d42a7e5d1f01.tar.gz emacs-ac6ea598302cd33014880a7a5f43d42a7e5d1f01.zip | |
* 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 @@ | |||
| 1514 | ;; `ad-return-value' in a piece of after advice. For example: | 1514 | ;; `ad-return-value' in a piece of after advice. For example: |
| 1515 | ;; | 1515 | ;; |
| 1516 | ;; (defmacro foom (x) | 1516 | ;; (defmacro foom (x) |
| 1517 | ;; (` (list (, x)))) | 1517 | ;; `(list ,x)) |
| 1518 | ;; foom | 1518 | ;; foom |
| 1519 | ;; | 1519 | ;; |
| 1520 | ;; (foom '(a)) | 1520 | ;; (foom '(a)) |
| @@ -1547,8 +1547,8 @@ | |||
| 1547 | ;; (defadvice foom (after fg-print-x act) | 1547 | ;; (defadvice foom (after fg-print-x act) |
| 1548 | ;; "Print the value of X." | 1548 | ;; "Print the value of X." |
| 1549 | ;; (setq ad-return-value | 1549 | ;; (setq ad-return-value |
| 1550 | ;; (` (progn (print (, x)) | 1550 | ;; `(progn (print ,x) |
| 1551 | ;; (, ad-return-value))))) | 1551 | ;; ,ad-return-value))) |
| 1552 | ;; foom | 1552 | ;; foom |
| 1553 | ;; | 1553 | ;; |
| 1554 | ;; (macroexpand '(foom '(a))) | 1554 | ;; (macroexpand '(foom '(a))) |