(describe-mode): Test mini-mode symbol for being

[gnu-emacs] / lisp / emacs-lock.el

diff --git a/lisp/emacs-lock.el b/lisp/emacs-lock.el
index 729a0d0439ae3f30192498e3add2a690fec41866..f060e9f789ba6269516643873366d74f47b24c74 100644 (file)
--- a/lisp/emacs-lock.el
+++ b/lisp/emacs-lock.el
@@ -4,7 +4,7 @@
 
 ;; Author: Tom Wurgler <twurgler@goodyear.com>
 ;; Created: 12/8/94
-;; Keywords:
+;; Keywords: extensions, processes
 
 ;; This file is part of GNU Emacs.
 
@@ -74,7 +74,7 @@ If t is found, signal error and display the locked buffer name."
       (error "Buffer `%s' is locked, can't delete it" (buffer-name))))
 
 ; These next defuns make it so if you exit a shell that is locked,  the lock
-; is shut off for that shell so you can exit emacs.  same for telnet.
+; is shut off for that shell so you can exit emacs.  Same for telnet.
 ; Also, if a shell or a telnet buffer was locked and the process killed,
 ; turn the lock back on again if the process is restarted.
 
@@ -85,7 +85,7 @@ If t is found, signal error and display the locked buffer name."
 (defun emacs-lock-clear-sentinel (proc str)
   (if emacs-lock-from-exiting
       (progn
-        (setq emacs-lock-from-exiting nil)
+       (setq emacs-lock-from-exiting nil)
        (setq emacs-lock-buffer-locked t)
        (message "Buffer is now unlocked"))
     (setq emacs-lock-buffer-locked nil)))