[Mew-dist 05052] Re: mew-1.93b39

Masahiro MURATA ( 村田全寛 ) muse at example.com
1998年 6月 12日 (金) 10:27:38 JST


  村田@神戸です。

>>> In [Mew-dist 05049] Re: mew-1.93b39
>>> OKUNISHI Fujikazu wrote:

> [2 goto-Virtual patch <text/plain; us-ascii (7bit)>]
> --- mew.el.orig	Thu Jun 11 03:06:28 1998
> +++ mew.el	Thu Jun 11 22:31:56 1998
> @@ -554,10 +554,12 @@
>  (defun mew-kill-buffer (&optional buf)

  (mew-kill-buffer mew-buffer-hello)

の場合にエラーになるので,次のようにする必要があるかと思います。

-------------- next part --------------
--- mew.el.orig	Fri Jun 12 09:21:40 1998
+++ mew.el	Fri Jun 12 09:29:38 1998
@@ -554,8 +554,10 @@
 (defun mew-kill-buffer (&optional buf)
   "Erase the current mode(buffer)."
   (interactive)
-  (let* ((buf (if buf buf (current-buffer)))
-	 (bname (buffer-name buf)))
+  (let* ((buf (or buf (current-buffer)))
+	 (bname (if (bufferp buf)
+		    (buffer-name buf)
+		  buf)))
     (if (eq major-mode 'mew-virtual-mode)
 	(setq mew-folder-alist
 	      (delq (assoc bname mew-folder-alist) mew-folder-alist)))
-------------- next part --------------
> ;; Prom-Mew な場合は困るので、そっちも改竄してしまいました(^_^;
> ;; ベースは 1.92.10 です。

  http://www02.so-net.ne.jp/~murata/software/prom-pre.html

をどうぞ。mew-summary-goto-folder の改変に影響されないようにしました。

--
村田 全寛 / MURATA Masahiro
Get Prom-Mew <http://www02.so-net.ne.jp/~murata/software/prom.html>


Mew-dist メーリングリストの案内