projects
/
elisp
/
wanderlust.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
2001-10-15 NAKAJIMA Mikio <minakaji@osaka.email.ne.jp>
[elisp/wanderlust.git]
/
elmo
/
elmo-dop.el
diff --git
a/elmo/elmo-dop.el
b/elmo/elmo-dop.el
index
4c2f161
..
b944188
100644
(file)
--- a/
elmo/elmo-dop.el
+++ b/
elmo/elmo-dop.el
@@
-419,8
+419,10
@@
even an operation concerns the unplugged folder."
(car appendings))))
(when file-string
(condition-case ()
(car appendings))))
(when file-string
(condition-case ()
- (elmo-append-msg folder file-string (car appendings) nil
- (not (member (car appendings) seen-list)))
+ (setq failure (not
+ (elmo-append-msg
+ folder file-string (car appendings) nil
+ (not (member (car appendings) seen-list)))))
(quit (setq failure t))
(error (setq failure t)))
(setq i (+ 1 i))
(quit (setq failure t))
(error (setq failure t)))
(setq i (+ 1 i))