Pyon's Diary
2003-06-01 舊 平成拾伍年皐月貳日 (晴) [更]
夏目家の妙な人々。
夏目家の妙な人々を購入した。
きんぎんすなごに出て來た夏目蒼一朗の高校生時代の話。微妙に設定が異なるけど、家族も似た性格で、あの性格が畫面一杯に犇めいてゐるのは凄いかも。
此で講談社から今迄出てゐる分のコミックは補完が完了した。
けふは銀座→池袋→高田馬場→池袋。
御昼に銀座で待合はせ。四丁目交叉點のDOUTORで、行く途中で買つた養老孟司のバカの壁を讀みつゝ待つてゐたら彼女が到着。
讀み終はり迄後少しだつたので、彼女に朝届いた夏目家の妙な人々を渡す。したら、ひ○で○しさんから電話が掛かつて來て、單車で轉んだとの事、取敢へず無事との事なので、一安心。

二人共余り空腹では無かつたので、散歩。四丁目交叉點から一丁目の方へ歩いて其之儘京橋の方迄てくゝゝ。一寸銀座の街を歩いてからパスタ屋へ行つてパスタセットを攝る。其れから彼女が低反撥枕を買ふ爲に池袋へ。三越で枕フィッターの人と相談し乍買つてゐた。
其之後は人混みを抜けて散歩、鬼子母神の方へ行つてみた。屋臺が一つしか出てゐなくて一寸寂しかつた。寺を通り抜けて、其之儘南へ歩いて行つた、南池袋から高田を經て早稲田へ出た。結構歩いて疲れて來たので、右へ曲がつて、新目白通り、明治通りを横斷して高田馬場の驛へ。ちかれたので驛前のルノアールで一休み。
中では背廣を着た就職活動中と思はれる學生達が屯つてゐた。其處で二人で今週の東京一週間を眺めて足を休めた後、驛の反對側へ晩御飯の焼肉を食べに行く。一皿五百圓の店が在つたので、其處で晩御飯を攝つた。
其れから腹熟しに又池袋迄歩く。途中尿意を催して目白迄我慢してゐたら何時の間にか目白を通り過ぎて池袋に來てゐたので、喫茶店に驅込んで大事に至らずに濟んだ。其處で一休みして、改札迄彼女を見送つて歸つた。けふは澤山歩いた。御疲れ樣でした。
2005-06-01 舊 平成拾漆年卯月廿伍日 (曇) [更]
Rio Unite 130 (No.01) 購入した。
Rio Unite 130 を購入した。
最初の充電をしやうと AC アダプタに繋いだが充電燈が點か無い。計算機の USB ポートに插しても認識し無いし、充電燈が點か無い。
フアームウエア・アツプデートのソフトを動かしたら、やつと認識したけどフアームウエア・アツプデートに失敗。
頭に來て 2ch のスレを讀んでゐたら、此は酷い不良品だと判つたので、明日交換に行く事にして寢た。
2007-06-01 舊 平成拾玖年卯月拾陸日 (金・曇) [更]
2010-06-01 舊 平成廿貳年庚寅卯月拾玖日壬午 (火・晴) [更]
Emacs23でのフォントの設定。
- CocoaEmacs(Emacs23.1.91 Mac)での等幅フォントの設定例 - とある日の Emacs - Emacsグループ。
- EmacsのX Windowフォントの設定方法(1) (Weblog on mebius.tokaichiba.jp)
- EmacsのX Windowフォントの設定方法(2) (Weblog on mebius.tokaichiba.jp)
色々檢索して嫌になる位試行錯誤を繰り返したが、以上の三つのサイトの御蔭で何とか設定出來た。
普通に檢索すると大抵、
- set-frame-font
- set-fontset-font
の組み合はせで解説してゐるが、其れだと「C-x 5 2」で新しいフレームを作つた時にフォントの設定が反映されない。
上に擧げた三つの頁で解説されてゐる通り、
- create-fontset-from-ascii-font
- set-fontset-font
で設定すると新規フレームにも設定が反映されるやうになつた。
(when window-system
(when (and run-unix emacs23)
;;; Font
(create-fontset-from-ascii-font
"Bitstream Vera Sans Mono:style=Regular:slant=normal:weight=normal:size=12"
nil "bsms")
(set-fontset-font "fontset-bsms"
'japanese-jisx0213-1
(font-spec :family "IPAGothic" :size '14))
(set-fontset-font "fontset-bsms"
'japanese-jisx0213-2
(font-spec :family "IPAGothic" :size '14))
(set-fontset-font "fontset-bsms"
'unicode
(font-spec :family "IPAGothic" :size '14)
nil
'append)
;;; Frame (default)
(setq default-frame-alist
(append (list
'(top . 50) ; フレームの Y 位置(ピクセル数)
'(left . 10) ; フレームの X 位置(ピクセル数)
'(width . 80) ; フレーム幅(文字数)
'(height . 35) ; フレーム高(文字数)
'(font . "fontset-bsms")
) default-frame-alist))
;;; Frame (initial)
(setq initial-frame-alist default-frame-alist)
))