summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp
diff options
context:
space:
mode:
authorGlenn Morris <rgm@gnu.org>2018-04-04 07:50:45 -0700
committerGlenn Morris <rgm@gnu.org>2018-04-04 07:50:45 -0700
commit2f779d8ce804de84fed55a6b0aa74499ef369852 (patch)
tree6c2ce6ccea8faceb9c3bfa93536788e5bdaf2510 /lisp/emacs-lisp
parentbc17d5d12474e57bb50535224be3c96349df383a (diff)
parent3109d2bb17f975c045e1b683e73254e6d24ab017 (diff)
downloademacs-2f779d8ce804de84fed55a6b0aa74499ef369852.tar.gz
emacs-2f779d8ce804de84fed55a6b0aa74499ef369852.tar.bz2
emacs-2f779d8ce804de84fed55a6b0aa74499ef369852.zip
Merge from origin/emacs-26
3109d2b (origin/emacs-26) ; * lisp/ldefs-boot.el: Update. 86825c4 * etc/NEWS: Remove temporary markup. 737d0a2 * Update etc/AUTHORS fbd03ba * ChangeLog.3: Update 56794ac Fix Bug#31022 a231c33 Update "Calendrical Calculations" cites 1527235 ; * doc/lispref/compile.texi (Compilation Functions): Fix wor... b07decd ; * doc/lispref/compile.texi (Compilation Functions): Fix typo a64c11a Fix term.el rendering following a window resize (Bug#30544) 1e6f09a * files.el (auto-save-visited-mode): Don't prompt for filenames. eb8b13f ; * etc/NEWS: Improve the entry about pinentry.el removal. 52501ec Quote a few backticks in docstrings. Conflicts: etc/NEWS lisp/ldefs-boot.el
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r--lisp/emacs-lisp/macroexp.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/emacs-lisp/macroexp.el b/lisp/emacs-lisp/macroexp.el
index b2ac8be53cc..93678bad7a6 100644
--- a/lisp/emacs-lisp/macroexp.el
+++ b/lisp/emacs-lisp/macroexp.el
@@ -318,7 +318,7 @@ definitions to shadow the loaded ones for use in file byte-compilation."
(cons (nreverse decls) body)))
(defun macroexp-progn (exps)
- "Return an expression equivalent to `(progn ,@EXPS)."
+ "Return an expression equivalent to \\=`(progn ,@EXPS)."
(if (cdr exps) `(progn ,@exps) (car exps)))
(defun macroexp-unprogn (exp)
@@ -327,14 +327,14 @@ Never returns an empty list."
(if (eq (car-safe exp) 'progn) (or (cdr exp) '(nil)) (list exp)))
(defun macroexp-let* (bindings exp)
- "Return an expression equivalent to `(let* ,bindings ,exp)."
+ "Return an expression equivalent to \\=`(let* ,bindings ,exp)."
(cond
((null bindings) exp)
((eq 'let* (car-safe exp)) `(let* (,@bindings ,@(cadr exp)) ,@(cddr exp)))
(t `(let* ,bindings ,exp))))
(defun macroexp-if (test then else)
- "Return an expression equivalent to `(if ,TEST ,THEN ,ELSE)."
+ "Return an expression equivalent to \\=`(if ,TEST ,THEN ,ELSE)."
(cond
((eq (car-safe else) 'if)
(cond