[mhc:02095] Re: Location: guess 時の全角半角変換

[Hideyuki SHIRAI (白井秀行) <shirai@xxxxxxxxxxxxx>]

白井です。

# 今のところ、まったく MHC に裂く時間はありません。CVS, CVS... (_ _)

From: NOGUCHI Yusuke <nogunogu@xxxxxxxxxxxxxxxxx> さん曰く
Subject: [mhc:02094] Re: Location: guess 時の全角半角変換
Message-ID: <20050415.162137.68548225.nogunogu@xxxxxxxxxxxxxxxxx>
Date: Fri, 15 Apr 2005 16:21:37 +0900 (JST)

> (japanese-hankaku "コミュニティホール" t)
> "コミュニティホ-ル"

> (japanese-hankaku "コミュニティホ〜ル" t)
> "コミュニティホ~ル"
> 
> 上記のような "ー" -> "-"、 "〜"->"~" を変換しないようにする方法は
> ないものでしょうか?

japanese-hankaku() のコードを読めばわかるのですが、ascii-only を
つけたときは、
(get-char-code-property ?〜 'ascii) => 126
の結果で置き換えるようになっています。

# ちなみに、(string 126) => "~" です。

ちなみに、"あ" は
(get-char-code-property ?あ 'ascii) => nil
なので置き換えません。

よって、get-char-code-property() が返す値を変えれば良いのですが、
それには、通常 put-char-code-property() を以下のように使います。

(put-char-code-property ?〜 'ascii nil)
で、
(get-char-code-property ?〜 'ascii) => nil
となり、
(japanese-hankaku "コミュニティホ〜ル" t) => "コミュニティホ〜ル"
と変換されるようになります。

-- 
白井秀行 (mailto:shirai@xxxxxxxxxxxxx)