[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[mhc:02043] patch (mhc-guess.el)



野口です

-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
【場所】 ほげほげ
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-

上記のような書式のメールだった場合に、location の guess で
  
  Location: 】

となってしまうのを回避するためのパッチを添付いたします。
以前、[mhc 1995] でご提案した内容も含めています。

以上、御検討いただければ幸いです。
-- 
NOGUCHI Yusuke <nogunogu@xxxxxxxxxxxxxxxxx>
*** mhc-guess.el.org	Tue Mar  8 17:13:59 2005
--- mhc-guess.el	Tue Mar  8 17:30:22 2005
***************
*** 180,186 ****
  
  (defvar mhc-guess-location-regexp-list
    `(
!     (,(concat "場[  ]*所[  ]*[::]*[\n  ]*\\([^\n  ]+\\)")
       mhc-guess/make-location-from-string 1)
      (,(concat "於[  ]*\\([^\n  ]+\\)")
       mhc-guess/make-location-from-string 1)
--- 180,186 ----
  
  (defvar mhc-guess-location-regexp-list
    `(
!     (,(concat "[会  ]*場[  ]*[所  ]*[::]*[】〕]}}》>>』))]*\\]*[\n  ]*\\([^\n  ]+\\)")
       mhc-guess/make-location-from-string 1)
      (,(concat "於[  ]*\\([^\n  ]+\\)")
       mhc-guess/make-location-from-string 1)