diff options
| -rw-r--r-- | lisp/tumme.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/tumme.el b/lisp/tumme.el index c9f9b83ef32..1d313963d2a 100644 --- a/lisp/tumme.el +++ b/lisp/tumme.el @@ -1009,7 +1009,7 @@ use only useful if `tumme-track-movement' is nil." (let ((old-buf (current-buffer)) (dired-buf (tumme-associated-dired-buffer)) (file-name (tumme-original-file-name))) - (when (and dired-buf file-name) + (when (and (buffer-live-p dired-buf) file-name) (setq file-name (file-name-nondirectory file-name)) (set-buffer dired-buf) (goto-char (point-min)) @@ -1134,7 +1134,7 @@ comment." (format-spec tumme-display-properties-format (list - (cons ?b buf) + (cons ?b (or buf "")) (cons ?f file) (cons ?t (or (princ props) "")) (cons ?c (or comment ""))))) |