From 0a6e2b3bfce8b5ae9e713e0668cb3cf5609073e2 Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Wed, 3 Aug 2022 13:13:57 +0200 Subject: [PATCH] Fix quoting of #' in some doc strings * lisp/org/ox.el (org-export-to-file): * lisp/eshell/esh-arg.el (eshell-concat): * lisp/emacs-lisp/edebug.el (edebug-read-special): * lisp/dired-aux.el (dired-split): Fix quoting of #' in doc strings. --- lisp/dired-aux.el | 2 +- lisp/emacs-lisp/edebug.el | 2 +- lisp/eshell/esh-arg.el | 2 +- lisp/org/ox.el | 2 +- 4 files changed, 4 insertions(+), 4 deletions(-) diff --git a/lisp/dired-aux.el b/lisp/dired-aux.el index b9f33036e31..bb24954386b 100644 --- a/lisp/dired-aux.el +++ b/lisp/dired-aux.el @@ -3058,7 +3058,7 @@ Optional third arg LIMIT (>= 1) is a limit to the length of the resulting list. Thus, if SEP is a regexp that only matches itself, - (mapconcat #'identity (dired-split SEP STRING) SEP) + (mapconcat #\\='identity (dired-split SEP STRING) SEP) is always equal to STRING." (declare (obsolete split-string "29.1")) diff --git a/lisp/emacs-lisp/edebug.el b/lisp/emacs-lisp/edebug.el index 1a1d58d6e36..dff16df0029 100644 --- a/lisp/emacs-lisp/edebug.el +++ b/lisp/emacs-lisp/edebug.el @@ -864,7 +864,7 @@ marker. The needed data will then come from property (defun edebug-read-special (stream) "Read from STREAM a Lisp object beginning with #. -Turn #'thing into (function thing) and handle the read syntax for +Turn #\\='thing into (function thing) and handle the read syntax for circular objects. Let `read' read everything else." (catch 'return (forward-char 1) diff --git a/lisp/eshell/esh-arg.el b/lisp/eshell/esh-arg.el index 459487f4358..8e44a88459f 100644 --- a/lisp/eshell/esh-arg.el +++ b/lisp/eshell/esh-arg.el @@ -186,7 +186,7 @@ If QUOTED is nil, the resulting value(s) may be converted to numbers (see `eshell-concat-1'). If each argument in REST is a non-list value, the result will be -a single value, as if (mapconcat #'eshell-stringify REST) had been +a single value, as if (mapconcat #\\='eshell-stringify REST) had been called, possibly converted to a number. If there is at least one (non-nil) list argument, the result will diff --git a/lisp/org/ox.el b/lisp/org/ox.el index 1bdf4dead89..9a2a69b2c16 100644 --- a/lisp/org/ox.el +++ b/lisp/org/ox.el @@ -6479,7 +6479,7 @@ to send the output file through additional processing, e.g, (let ((outfile (org-export-output-file-name \".tex\" subtreep))) (org-export-to-file \\='latex outfile async subtreep visible-only body-only ext-plist - #'org-latex-compile))) + #\\='org-latex-compile))) When expressed as an anonymous function, using `lambda', POST-PROCESS needs to be quoted. -- 2.39.5