summaryrefslogtreecommitdiff
path: root/lisp/emacs-lock.el
diff options
context:
space:
mode:
authorJuanma Barranquero <lekktu@gmail.com>2019-10-17 02:08:43 +0200
committerJuanma Barranquero <lekktu@gmail.com>2019-10-17 02:08:43 +0200
commit2bb0703e24ec1b02bb2ab4be67719e2e050cc4d3 (patch)
tree77a076491e0635e2728393ac79c87f925e4a935e /lisp/emacs-lock.el
parentd502f0c4b5bf0d6dbf0a125b01db21fa3b6292df (diff)
downloademacs-2bb0703e24ec1b02bb2ab4be67719e2e050cc4d3.tar.gz
lisp/*.el: Force non-nil result to t, to match docstring
* lisp/emacs-lock.el (emacs-lock-live-process-p): * lisp/shadowfile.el (shadow-file-match): * lisp/emacs-lisp/edebug.el (edebug-basic-spec): * lisp/mail/rmail.el (rmail-expunge-confirmed): * lisp/net/soap-client.el (soap-should-encode-value-for-xs-element): * lisp/progmodes/idlwave.el (idlwave-quoted): * lisp/progmodes/idlw-shell.el (idlwave-shell-filename-string): * lisp/textmodes/refbib.el (r2b-isa-proceedings): * lisp/textmodes/texnfo-upd.el (texinfo-find-lower-level-node): Normalize boolean result.
Diffstat (limited to 'lisp/emacs-lock.el')
-rw-r--r--lisp/emacs-lock.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lock.el b/lisp/emacs-lock.el
index 0cded29193a..1c1ea59f05b 100644
--- a/lisp/emacs-lock.el
+++ b/lisp/emacs-lock.el
@@ -115,7 +115,7 @@ Internal use only.")
(defun emacs-lock-live-process-p (buffer-or-name)
"Return t if BUFFER-OR-NAME is associated with a live process."
- (process-live-p (get-buffer-process buffer-or-name)))
+ (and (process-live-p (get-buffer-process buffer-or-name)) t))
(defun emacs-lock--can-auto-unlock (action)
"Return t if the current buffer can auto-unlock for ACTION.