diff options
| author | Jan Djärv | 2002-03-12 21:15:07 +0000 |
|---|---|---|
| committer | Jan Djärv | 2002-03-12 21:15:07 +0000 |
| commit | 3842fde1176c867f87b0fb65c0ab68e815b8c419 (patch) | |
| tree | 89755d706e5350a005138098c6bf85cc31b59873 | |
| parent | fa99e2a4ca1ae061696c88033a9c2557e3361a73 (diff) | |
| download | emacs-3842fde1176c867f87b0fb65c0ab68e815b8c419.tar.gz emacs-3842fde1176c867f87b0fb65c0ab68e815b8c419.zip | |
(emacs-session-save): Add comment that return t means cancel shutdown
| -rw-r--r-- | lisp/term/x-win.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/term/x-win.el b/lisp/term/x-win.el index 406cc5a3eae..2e09c327a07 100644 --- a/lisp/term/x-win.el +++ b/lisp/term/x-win.el | |||
| @@ -282,6 +282,7 @@ that it should abort the window system shutdown." | |||
| 282 | (delete-file filename)) | 282 | (delete-file filename)) |
| 283 | (with-current-buffer buf | 283 | (with-current-buffer buf |
| 284 | (let ((cancel-shutdown (condition-case nil | 284 | (let ((cancel-shutdown (condition-case nil |
| 285 | ;; A return of t means cancel the shutdown. | ||
| 285 | (run-hook-with-args-until-success | 286 | (run-hook-with-args-until-success |
| 286 | 'emacs-save-session-functions) | 287 | 'emacs-save-session-functions) |
| 287 | (error t)))) | 288 | (error t)))) |