diff options
Diffstat (limited to 'lisp/emacs-lock.el')
| -rw-r--r-- | lisp/emacs-lock.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/emacs-lock.el b/lisp/emacs-lock.el index ac12c149b01..f1fa9316c82 100644 --- a/lisp/emacs-lock.el +++ b/lisp/emacs-lock.el @@ -109,8 +109,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." - (let ((proc (get-buffer-process buffer-or-name))) - (and proc (process-live-p proc)))) + (process-live-p (get-buffer-process buffer-or-name))) (defun emacs-lock--can-auto-unlock (action) "Return t if the current buffer can auto-unlock for ACTION. |