Kazu Yamamoto ( 山本和彦 )
kazu****@iij*****
2005年 7月 6日 (水) 14:42:27 JST
山本です。 > CVS 先端の、carbon-font は、この方法で設定した上で、等幅の設定を追加してあ > ります。 最新の carbon-font を取ってきましたが、これをインストールすると英文字と 日本語文字の幅の比が 1:2 になりません。(以前はうまくいっていました。) どのフォントを選んでも、おかしくなります。それで、ソースを見たのですが、 原因は掴めていません。 本件とはまったく関係ないですが、Emacs Lisp の書き方に間違いや作法に合っ てないところがあるので、大きなお世話だと思いますが、書いておきます。 1) while loop の書き方が間違っています。(carbon-font-create-fontset の ところ。) この書き方だと、リスト中に nil という要素があれば、loop が 終了してしまいます。 正しい書き方は、以下を見て下さい。 http://www.math.s.chiba-u.ac.jp/~matsu/lisp/emacs-lisp-intro-jp_12.html#SEC130 2) 閉じ括弧の書き方が、作法に則っていません。閉じ括弧だに一行を消費する のはお行儀が悪いことだとされています。Emacs Lisp のマニュアルには 以下のように書いてあります。 * Don't make a habit of putting close-parentheses on lines by themselves; Lisp programmers find this disconcerting. Once in a while, when there is a sequence of many consecutive close-parentheses, it may make sense to split the sequence in one or two significant places. 3) (if x x y) は、(or x y) で十分ですね。 参考までに、以下に書き直したソースを置きました。 http://www.mew.org/~kazu/carbon-font.el --かず
