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

[mhc:01987] another patch for mhc-guess.el (Re: Re: patch for mhc-guess.el)



野口と申します。


From: Yoshinari Nomura <nom@xxxxxxxxxxxxx>
Subject: [mhc:01981] Re: patch for mhc-guess.el
Date: Thu, 28 Oct 2004 17:42:26 +0900

> 遅くなりましたが,commit しておきました.

ありがとうございます。

別パターンで、『場所』や『@』のような(いわゆる)ヘッダ表記の無い
下記のようなパターンもlocation-guessで引っ掛けたいと思っております。

-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
11月2日(火) 17:00-19:00  6FNWS実験室
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-

とりあえず、手元では以下の変更をすることで望み通りの動作をしております。
問題がないようでしたら、取りこんでいただければと思っております。
(正規表現については、よくわかっていないため無駄なことをして個所が多々
あると思います...)
-- 
noguchi



*** mhc-guess.el.org	Mon Oct 25 18:00:09 2004
--- mhc-guess.el	Mon Nov  1 16:07:16 2004
***************
*** 173,179 ****
       mhc-guess/make-time-from-hhmm 1 2 5 7 6)
      ))
  
! (defvar mhc-guess-location-list '()
    "*List of the regexps of the location, like this
    '(\"第?[0-90-9〇-九]+応接室?\"
      \"第?[0-90-9〇-九]+会議室[0-90-9〇-九]?\"))")
--- 173,180 ----
       mhc-guess/make-time-from-hhmm 1 2 5 7 6)
      ))
  
! (defvar mhc-guess-location-list   
!   '("[第]*[a-zA-Z0-90-9〇-九]*[応接]*[会議]*[実験]*室[a-zA-Z0-90-9〇-九]*")
    "*List of the regexps of the location, like this
    '(\"第?[0-90-9〇-九]+応接室?\"
      \"第?[0-90-9〇-九]+会議室[0-90-9〇-九]?\"))")