aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/tumme.el4
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."
1009 (let ((old-buf (current-buffer)) 1009 (let ((old-buf (current-buffer))
1010 (dired-buf (tumme-associated-dired-buffer)) 1010 (dired-buf (tumme-associated-dired-buffer))
1011 (file-name (tumme-original-file-name))) 1011 (file-name (tumme-original-file-name)))
1012 (when (and dired-buf file-name) 1012 (when (and (buffer-live-p dired-buf) file-name)
1013 (setq file-name (file-name-nondirectory file-name)) 1013 (setq file-name (file-name-nondirectory file-name))
1014 (set-buffer dired-buf) 1014 (set-buffer dired-buf)
1015 (goto-char (point-min)) 1015 (goto-char (point-min))
@@ -1134,7 +1134,7 @@ comment."
1134 (format-spec 1134 (format-spec
1135 tumme-display-properties-format 1135 tumme-display-properties-format
1136 (list 1136 (list
1137 (cons ?b buf) 1137 (cons ?b (or buf ""))
1138 (cons ?f file) 1138 (cons ?f file)
1139 (cons ?t (or (princ props) "")) 1139 (cons ?t (or (princ props) ""))
1140 (cons ?c (or comment ""))))) 1140 (cons ?c (or comment "")))))