(elmo-folder-pack-numbers total "Packing...")
(dolist (old-number numbers)
(setq entity (elmo-msgdb-message-entity msgdb old-number))
- (elmo-msgdb-overview-entity-set-number entity number)
+ (elmo-message-entity-set-number entity number)
(elmo-msgdb-append-entity new-msgdb entity
(elmo-msgdb-flags msgdb old-number))
(setq location