[Mew-dist 10694] Re: Config:[TAB]

[SAKAI Kiyotaka]

>> In article <19990906192635X.cad11870 at example.com>, ayanokoji <cad11870 at example.com> writes:

> Solaris 2.6 + Emacs 20.4 + Mew 1.94です。
> 既出でしたらごめんなさい。

> ヘッダにおいて
>  Config:
> を手で挿入し，そのあとに
>  [TAB]
> を押すと，タブが挿入されますが，これは仕様でしょうか？

> 設定可能なConfigの値が *Mew completions* に出てくることを期待したいと
> ころなのですが，そうはなりません。
> もちろんすべての値を見るにはC-c TABを何度か押せばいいことなのでしょう
> が，少し気持ち悪いです。そして，Config:のあとにTABを2度押すと，
>  No matching mew-config-list
> というメッセージが出るのは，どうも納得がいきません。

このパッチでどうでしょうか？
-- 
酒井 清隆 (E-mail: ksakai at example.com)
-------------- next part --------------
===================================================================
RCS file: RCS/mew-complete.el,v
retrieving revision 1.1
diff -c -r1.1 mew-complete.el
*** mew-complete.el	1999/09/17 08:11:03	1.1
--- mew-complete.el	1999/09/17 08:12:26
***************
*** 149,162 ****
  (defun mew-complete-config ()
    "Complete function for Config:."
    (interactive)
!   (let ((word (mew-delete-value ",")))
!     (if (null word)
! 	(tab-to-tab-stop)
!       (mew-complete
!        word
!        (mew-slide-pair mew-config-list)
!        "mew-config-list"
!        nil))))
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ;;;
--- 149,160 ----
  (defun mew-complete-config ()
    "Complete function for Config:."
    (interactive)
!   (let ((word (or (mew-delete-value ",") "")))
!     (mew-complete
!      word
!      (mew-slide-pair mew-config-list)
!      "mew-config-list"
!      nil)))
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ;;;