Re: wl can't work on XEmacs/FreeBSD
Tatsuya Kinoshita <[email protected]>
| Newsgroups | gmane.mail.wanderlust.general.japanese |
|---|---|
| Message-ID | <20161028.194330.1068511413334940708.tats%[email protected]> |
On October 28, 2016, [Wanderlust:14661], kzhr (at d1.dion.ne.jp) wrote: > (setq wl-draft-send-confirm-type 'y-or-n-p) > と追記してみてください。 手元のwanderlust/flimでは、それに加えて添付のパッチが必要でした。 (smtp-send-bufferでkill-bufferがwrong-number-of-arguments) -- 木下達也
flim-xemacs.patch
(text/x-patch, 753 B)
diff --git a/smtp.el b/smtp.el index e9ebb42..d667e2e 100644 --- a/smtp.el +++ b/smtp.el @@ -381,7 +381,7 @@ BUFFER may be a buffer or a buffer name which contains mail message." (setq smtp-connection-alist (delq (assq buffer smtp-connection-alist) smtp-connection-alist)) - (kill-buffer)))))) + (kill-buffer (current-buffer))))))) (defun smtp-submit-package (package) (unwind-protect @@ -445,7 +445,7 @@ BUFFER may be a buffer or a buffer name which contains mail message." (setq smtp-connection-alist (delq (assq buffer smtp-connection-alist) smtp-connection-alist)) - (kill-buffer))) + (kill-buffer (current-buffer)))) (setq servers (cdr servers))))) ;;; @ hook methods for `smtp-submit-package'