From b3014a35763a3e607a0a6850b20ed1564639774a Mon Sep 17 00:00:00 2001 From: kaoru Date: Tue, 31 Aug 2010 10:20:41 +0000 Subject: [PATCH] * elmo-localdir.el (elmo-folder-pack-numbers): Fix `elmo-bind-directory' indent. --- elmo/ChangeLog | 3 +++ elmo/elmo-localdir.el | 9 ++++----- 2 files changed, 7 insertions(+), 5 deletions(-) diff --git a/elmo/ChangeLog b/elmo/ChangeLog index 337790b..4645a97 100644 --- a/elmo/ChangeLog +++ b/elmo/ChangeLog @@ -1,5 +1,8 @@ 2010-08-31 TAKAHASHI Kaoru + * elmo-localdir.el (elmo-folder-pack-numbers): Fix + `elmo-bind-directory' indent. + * elmo-imap4.el (elmo-imap4-folder-list-range): Fix indent (only cosmetic fix). diff --git a/elmo/elmo-localdir.el b/elmo/elmo-localdir.el index 9651f8a..78a30f1 100644 --- a/elmo/elmo-localdir.el +++ b/elmo/elmo-localdir.el @@ -329,11 +329,10 @@ (dolist (old-number numbers) (setq entity (elmo-msgdb-message-entity msgdb old-number)) (when (not (eq old-number new-number)) ; why \=() is wrong.. - (elmo-bind-directory - dir - ;; xxx nfs,hardlink - (rename-file (number-to-string old-number) - (number-to-string new-number) t)) + (elmo-bind-directory dir + ;; xxx nfs,hardlink + (rename-file (number-to-string old-number) + (number-to-string new-number) t)) (elmo-message-entity-set-number entity new-number)) (elmo-msgdb-append-entity new-msgdb entity (elmo-msgdb-flags msgdb old-number)) -- 1.7.10.4