mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-29 07:58:28 +00:00
Code Issues Releases Activity

More checks for live buffers.

Browse Source 
* lisp/dired-x.el (dired-jump): Check if archive/tar superior buffer
was killed by the user.

* lisp/progmodes/ruby-mode.el (ruby-flymake--helper): Check if source buffer
was killed by the user immediately after visiting and before process finishes.
This commit is contained in:
Juri Linkov 2019-01-28 22:27:22 +02:00
parent 599eee3ebe
commit 0f94d422f1
2 changed files with 5 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lisp/dired-x.el
View File

@ -463,9 +463,11 @@ Interactively with prefix argument, read FILE-NAME."
(list nil (and current-prefix-arg
(read-file-name "Jump to Dired file: "))))
(cond
((bound-and-true-p archive-subfile-mode)
((and (bound-and-true-p archive-subfile-mode)
(buffer-live-p archive-superior-buffer))
(switch-to-buffer archive-superior-buffer))
((bound-and-true-p tar-subfile-mode)
((and (bound-and-true-p tar-subfile-mode)
(buffer-live-p tar-superior-buffer))
(switch-to-buffer tar-superior-buffer))
(t
;; Expand file-name before `dired-goto-file' call:

2
lisp/progmodes/ruby-mode.el
View File

@ -2288,7 +2288,7 @@ It will be properly highlighted even when the call omits parens.")
:command command
:sentinel
(lambda (proc _event)
(when (eq 'exit (process-status proc))
(when (and (eq 'exit (process-status proc)) (buffer-live-p source))
(unwind-protect
(if (with-current-buffer source (eq proc ruby--flymake-proc))
(with-current-buffer (process-buffer proc)