From 52501ec3f1e29d262844f69710a18e91f01f2326 Mon Sep 17 00:00:00 2001 From: Philipp Stephani Date: Sun, 1 Apr 2018 23:33:16 +0200 Subject: [PATCH] Quote a few backticks in docstrings. * lisp/emacs-lisp/macroexp.el (macroexp-progn, macroexp-let*) (macroexp-if): Quote backtick in docstrings. --- lisp/emacs-lisp/macroexp.el | 6 +++--- 1 file 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 -- 2.39.5