From 77a6496a06afe72c22ad97f88d13818807bf0451 Mon Sep 17 00:00:00 2001 From: morioka Date: Sat, 28 Aug 1999 11:01:43 +0000 Subject: [PATCH] (mime-store-message/partial-piece): Use `directory-files' to check there are missing pieces. --- mime-play.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/mime-play.el b/mime-play.el index 29545e2..0840304 100644 --- a/mime-play.el +++ b/mime-play.el @@ -613,7 +613,9 @@ It is registered to variable `mime-preview-quitting-method-alist'." (kill-buffer (current-buffer)) ))) ))) - (if (and total (> total 0)) + (if (and total (> total 0) + (>= (length (directory-files root-dir nil "^[0-9]+$" t)) + total)) (catch 'tag (save-excursion (set-buffer (get-buffer-create mime-temp-buffer-name)) -- 1.7.10.4