[Mew-dist 10098] Re: Mew 1.94b49 + IM 120

[SAKAI Kiyotaka]

>> In article <19990816171959W.t-matsuu at example.com>, MATSUURA Takanori / 松浦孝範 <t-matsuu at example.com> writes:

> make時に
> Compiling /work/mew-1.94b49/mew-scan.el...
> While compiling mew-summary-scan-body in file /work/mew-1.94b49/mew-scan.el:
>   ** variable call-process-hook bound but not referenced
> While compiling toplevel forms:
>   !! Wrong type argument ((stringp nil))
> となっています。

以下のパッチのように ' を付加するだけでいいと思います。
-- 
酒井 清隆 (E-mail: ksakai at example.com)
-------------- next part --------------
===================================================================
RCS file: RCS/mew-scan.el,v
retrieving revision 1.1
diff -c -r1.1 mew-scan.el
*** mew-scan.el	1999/08/16 08:24:49	1.1
--- mew-scan.el	1999/08/16 08:28:31
***************
*** 182,191 ****
        (mew-input-passwd prompt))))
  
  (defmacro mew-summary-scan-filter-skip ()
!   (setq mew-summary-buffer-string
! 	(concat
! 	 (substring mew-summary-buffer-string 0 (match-beginning 0))
! 	 (substring mew-summary-buffer-string (match-end 0)))))
  
  (defun mew-summary-scan-filter (process string)
    (let* ((after-change-function nil)
--- 182,191 ----
        (mew-input-passwd prompt))))
  
  (defmacro mew-summary-scan-filter-skip ()
!   '(setq mew-summary-buffer-string
! 	 (concat
! 	  (substring mew-summary-buffer-string 0 (match-beginning 0))
! 	  (substring mew-summary-buffer-string (match-end 0)))))
  
  (defun mew-summary-scan-filter (process string)
    (let* ((after-change-function nil)