From 9c2d888b35db9a941e83e859a548b928ccead5f0 Mon Sep 17 00:00:00 2001 From: Mathias Dahl Date: Sat, 27 May 2006 14:20:03 +0000 Subject: [PATCH] Change a lot of `(if .. (progn ..)' to `(when ..)'. (tumme-remove-tag): Fix bug. --- lisp/ChangeLog | 1 + lisp/tumme.el | 8 ++++---- 2 files changed, 5 insertions(+), 4 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 863881b3a40..cd99ecc3cdc 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,6 +1,7 @@ 2006-05-27 Mathias Dahl * tumme.el: Change a lot of `(if .. (progn ..)' to `(when ..)'. + (tumme-remove-tag): Fix bug. 2006-05-27 Thien-Thi Nguyen diff --git a/lisp/tumme.el b/lisp/tumme.el index 8358986cca7..b770c292d35 100644 --- a/lisp/tumme.el +++ b/lisp/tumme.el @@ -919,10 +919,10 @@ displayed." ;; If on empty line at end of buffer (when (and (eobp) (looking-at "^$")) - (delete-backward-char 1))))))) - files) - (save-buffer) - (kill-buffer buf))) + (delete-backward-char 1)))))) + files) + (save-buffer) + (kill-buffer buf)))) (defun tumme-list-tags (file) "Read all tags for image FILE from the image database." -- 2.39.5