Emacs doesn't remove locks on modified buffers during save-buffers-kill-emacs

[Colin Walters]

Hello,

When using 'C-x C-c' to exit Emacs, when there are modified buffers,
but the user says "n" to the query about saving the buffer, the lock
on the file is not deleted before Emacs exits.

I am not sure if this is the intended behavior; the following patch
removes all lock files before `kill-emacs' in
`save-buffers-kill-emacs'.

--- emacs-20.7-old/lisp/files.el        Sat Jul  8 18:03:58 2000
+++ emacs-20.7/lisp/files.el    Sun Sep 24 17:24:46 2000
@@ -3322,7 +3322,11 @@
                 (yes-or-no-p "Active processes exist; kill them and exit 
anyway? "))))
        ;; Query the user for other things, perhaps.
        (run-hook-with-args-until-failure 'kill-emacs-query-functions)
-       (kill-emacs)))
+       ;; unlock all buffers - we don't want to leave dead locks around
+       (progn (mapcar (function (lambda (buf) (with-current-buffer buf
+                                               (unlock-buffer))))
+                     (buffer-list))
+              (kill-emacs))))
 
 ;; We use /: as a prefix to "quote" a file name 
 ;; so that magic file name handlers will not apply to it.