From 8991841dee3fcd7d0c854836b894df0b6798b547 Mon Sep 17 00:00:00 2001 From: teranisi Date: Thu, 20 Apr 2000 08:54:43 +0000 Subject: [PATCH] * wl-mime.el (wl-message-request-partial): Eliminated argument `msgdb'. Don't pass `msgdb' argument to `elmo-read-msg-no-cache'. (wl-mime-combine-message/partial-pieces): Likewise. * tm-wl.el (wl-message-request-partial): Likewise. (wl-mime-combine-message/partial-pieces): Likewise. --- wl/ChangeLog | 9 +++++++++ wl/tm-wl.el | 9 ++++----- wl/wl-mime.el | 9 ++++----- 3 files changed, 17 insertions(+), 10 deletions(-) diff --git a/wl/ChangeLog b/wl/ChangeLog index 9646df7..2372630 100644 --- a/wl/ChangeLog +++ b/wl/ChangeLog @@ -1,3 +1,12 @@ +2000-04-20 Yuuichi Teranishi + + * wl-mime.el (wl-message-request-partial): + Eliminated argument `msgdb'. + Don't pass `msgdb' argument to `elmo-read-msg-no-cache'. + (wl-mime-combine-message/partial-pieces): Likewise. + * tm-wl.el (wl-message-request-partial): Likewise. + (wl-mime-combine-message/partial-pieces): Likewise. + 2000-04-17 Yoshiki Hayashi * wl-summary.el (wl-summary-sync-marks): Remove progress gauge diff --git a/wl/tm-wl.el b/wl/tm-wl.el index 6e14c9a..7507111 100644 --- a/wl/tm-wl.el +++ b/wl/tm-wl.el @@ -4,7 +4,7 @@ ;; Author: Yuuichi Teranishi ;; Keywords: mail, net news -;; Time-stamp: <00/04/10 23:47:38 teranisi> +;; Time-stamp: <00/04/20 13:45:03 teranisi> ;; This file is part of Wanderlust (Yet Another Message Interface on Emacsen). @@ -100,9 +100,9 @@ By setting following-method as yank-content." (if (setq mime-out-win (get-buffer-window mime-out-buf)) (delete-window mime-out-win))))) -(defun wl-message-request-partial (folder number msgdb) +(defun wl-message-request-partial (folder number) (elmo-set-work-buf - (elmo-read-msg-no-cache folder number (current-buffer) msgdb) + (elmo-read-msg-no-cache folder number (current-buffer)) (mime/parse-message nil nil))) (defalias 'wl-message-read 'mime-viewer/scroll-up-content) @@ -233,8 +233,7 @@ By setting following-method as yank-content." (setq cinfo (wl-message-request-partial folder - (elmo-msgdb-overview-entity-get-number (car overviews)) - msgdb)) + (elmo-msgdb-overview-entity-get-number (car overviews)))) (setq parameters (mime::content-info/parameters cinfo)) (setq the-id (assoc-value "id" parameters)) (if (string= the-id id) diff --git a/wl/wl-mime.el b/wl/wl-mime.el index c715fe0..df1ba13 100644 --- a/wl/wl-mime.el +++ b/wl/wl-mime.el @@ -4,7 +4,7 @@ ;; Author: Yuuichi Teranishi ;; Keywords: mail, net news -;; Time-stamp: <2000-04-10 23:49:34 teranisi> +;; Time-stamp: <2000-04-20 17:43:19 teranisi> ;; This file is part of Wanderlust (Yet Another Message Interface on Emacsen). @@ -192,9 +192,9 @@ By setting following-method as yank-content." (if (setq mime-out-win (get-buffer-window mime-out-buf)) (delete-window mime-out-win))))) -(defun wl-message-request-partial (folder number msgdb) +(defun wl-message-request-partial (folder number) (elmo-set-work-buf - (elmo-read-msg-no-cache folder number (current-buffer) msgdb) + (elmo-read-msg-no-cache folder number (current-buffer)) (mime-parse-buffer nil))); 'mime-buffer-entity))) (defalias 'wl-message-read 'mime-preview-scroll-up-entity) @@ -313,8 +313,7 @@ automatically." ;; request message at the cursor in Subject buffer. (wl-message-request-partial folder - (elmo-msgdb-overview-entity-get-number (car overviews)) - msgdb)) + (elmo-msgdb-overview-entity-get-number (car overviews)))) (situation (mime-entity-situation message)) (the-id (or (cdr (assoc "id" situation)) ""))) (when (string= (downcase the-id) -- 1.7.10.4