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

[mhc:01870] Re: guess location.



乃村です.

On Thu, 30 Oct 2003 18:22:36 +0900 (JST),
	Hideyuki SHIRAI (白井秀行) <shirai@xxxxxxxxxxxxx> said:

> (setq mhc-guess-location-list '("東京ドーム"
> 				"江戸川河川敷"
> 				"荒川河川敷"
> 				"ホームグランド"))
> 
> (defun mhc-guess-location-setup ()
>   (when mhc-guess-location-list
>     (let ((regex (regexp-opt mhc-guess-location-list)))
>       (unless (assoc regex mhc-guess-location-regexp-list)
> 	(setq mhc-guess-location-regexp-list
> 	      (cons `(,regex mhc-guess/make-location-from-string 0)
> 		    mhc-guess-location-regexp-list))))))
> 
> (add-hook 'mhc-setup-hook 'mhc-guess-location-setup)
> 
> なことを仕込めばよいと。
> 
> # 異論が無ければ(そのうち ^^;;;)やっておきます。

異論ありません.

実は,既存アーティクルの X-SC-Location: から 
mhc-guess-location-list 相当を作ろうと思っていたところでした.
でも重たくなりそうだし,効果の程も疑問ですね.
--
nom