[mew-int 2336] Re: Refiling many emails

[Kazu Yamamoto ( 山本和彦 )]

Hello,

Sorry for the loooong delay.

> When refiling many messages, and one imap folder does not exist, the
> error message is something like: "Mailbox name is wrong!" But WHAT
> mailbox? WHAT message?

The following patch would implement your request. However, since I
cannot cause the same error on my IMAP server, I cannot test it.

--Kazu

? LOG
Index: mew-imap.el
===================================================================
RCS file: /cvsroot/mew/mew/mew-imap.el,v
retrieving revision 1.269
diff -c -r1.269 mew-imap.el
*** mew-imap.el	25 Jul 2007 06:06:58 -0000	1.269
--- mew-imap.el	27 Jul 2007 07:03:42 -0000
***************
*** 420,428 ****
      (mew-imap-process-send-string pro pnm "CREATE \"%s\"" dst)))
  
  (defun mew-imap-command-wmbx (pro pnm)
!   (mew-imap-set-error pnm "Mailbox name is wrong!")
!   (mew-imap-set-status pnm "logout2")
!   (mew-imap-command-logout2 pro pnm))
  
  (defun mew-imap-command-pre-dels (pro pnm)
    (let ((dtt (length (mew-imap-get-dels pnm)))
--- 420,430 ----
      (mew-imap-process-send-string pro pnm "CREATE \"%s\"" dst)))
  
  (defun mew-imap-command-wmbx (pro pnm)
!   (let* ((rtr (mew-imap-get-rfl pnm))
! 	 (dst (nth 0 rtr)))
!     (mew-imap-set-error pnm (format "Cannot create '%s' or copy to it" dst))
!     (mew-imap-set-status pnm "logout2")
!     (mew-imap-command-logout2 pro pnm)))
  
  (defun mew-imap-command-pre-dels (pro pnm)
    (let ((dtt (length (mew-imap-get-dels pnm)))