aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorStefan Kangas2022-12-15 02:24:56 +0100
committerStefan Kangas2022-12-15 02:35:00 +0100
commita15cd55044c6bb4d4e9f9aec23b8b5b9cbcb38ac (patch)
tree55bbb00def05c574e0d6713d11ad9db222cda15e
parentda39200c4be29463ad58148dbe373f9095aab929 (diff)
downloademacs-a15cd55044c6bb4d4e9f9aec23b8b5b9cbcb38ac.tar.gz
emacs-a15cd55044c6bb4d4e9f9aec23b8b5b9cbcb38ac.zip
; Don't quote nil in comments
-rw-r--r--lisp/emacs-lisp/subr-x.el2
-rw-r--r--lisp/external-completion.el2
-rw-r--r--lisp/org/ob-clojure.el4
-rw-r--r--lisp/org/org-persist.el2
4 files changed, 5 insertions, 5 deletions
diff --git a/lisp/emacs-lisp/subr-x.el b/lisp/emacs-lisp/subr-x.el
index 0486baba83c..4896f4c2937 100644
--- a/lisp/emacs-lisp/subr-x.el
+++ b/lisp/emacs-lisp/subr-x.el
@@ -399,7 +399,7 @@ this defaults to the current buffer."
399 "Query the user for a process and return the process object." 399 "Query the user for a process and return the process object."
400 ;; Currently supports only the PROCESS argument. 400 ;; Currently supports only the PROCESS argument.
401 ;; Must either return a list containing a process, or signal an error. 401 ;; Must either return a list containing a process, or signal an error.
402 ;; (Returning `nil' would mean the current buffer's process.) 402 ;; (Returning nil would mean the current buffer's process.)
403 (unless (fboundp 'process-list) 403 (unless (fboundp 'process-list)
404 (error "Asynchronous subprocesses are not supported on this system")) 404 (error "Asynchronous subprocesses are not supported on this system"))
405 ;; Local function to return cons of a complete-able name, and the 405 ;; Local function to return cons of a complete-able name, and the
diff --git a/lisp/external-completion.el b/lisp/external-completion.el
index 8dd75b77193..e1c3d763142 100644
--- a/lisp/external-completion.el
+++ b/lisp/external-completion.el
@@ -154,7 +154,7 @@ EXPANDED-PATTERN."
154 ;; very often doesn't equate the full set of candidates 154 ;; very often doesn't equate the full set of candidates
155 ;; (many tools cap to sth like 100-1000 results). 155 ;; (many tools cap to sth like 100-1000 results).
156 ;; 156 ;;
157 ;; * when `_method' is `nil' or `lambda' which some 157 ;; * when `_method' is nil or `lambda' which some
158 ;; frontends will invoke. Here, `all' should be 158 ;; frontends will invoke. Here, `all' should be
159 ;; sufficient information for `complete-with-action' to 159 ;; sufficient information for `complete-with-action' to
160 ;; do the job correctly. 160 ;; do the job correctly.
diff --git a/lisp/org/ob-clojure.el b/lisp/org/ob-clojure.el
index b424cf48ff9..b045b4e6e54 100644
--- a/lisp/org/ob-clojure.el
+++ b/lisp/org/ob-clojure.el
@@ -248,8 +248,8 @@ or set the `:backend' header argument"))))
248 "value"))) 248 "value")))
249 result0))) 249 result0)))
250 (ob-clojure-string-or-list 250 (ob-clojure-string-or-list
251 ;; Filter out s-expressions that return `nil' (string "nil" 251 ;; Filter out s-expressions that return nil (string "nil"
252 ;; from nrepl eval) or comment forms (actual `nil' from nrepl) 252 ;; from nrepl eval) or comment forms (actual nil from nrepl)
253 (reverse (delete "" (mapcar (lambda (r) 253 (reverse (delete "" (mapcar (lambda (r)
254 (replace-regexp-in-string "nil" "" (or r ""))) 254 (replace-regexp-in-string "nil" "" (or r "")))
255 result0))))))) 255 result0)))))))
diff --git a/lisp/org/org-persist.el b/lisp/org/org-persist.el
index 1a32ed01020..9645dea7d9e 100644
--- a/lisp/org/org-persist.el
+++ b/lisp/org/org-persist.el
@@ -134,7 +134,7 @@
134;; from the persistent storage at the end of Emacs session. The 134;; from the persistent storage at the end of Emacs session. The
135;; expiry condition can be set when saving/registering data 135;; expiry condition can be set when saving/registering data
136;; containers. The expirty condition can be `never' - data will never 136;; containers. The expirty condition can be `never' - data will never
137;; expire; `nil' - data will expire at the end of current Emacs session; 137;; expire; nil - data will expire at the end of current Emacs session;
138;; a number - data will expire after the number days from last access; 138;; a number - data will expire after the number days from last access;
139;; a function - data will expire if the function, called with a single 139;; a function - data will expire if the function, called with a single
140;; argument - collection, returns non-nil. 140;; argument - collection, returns non-nil.