(正確には地域公開授業といってだれが見に行ってもよいのだが、わかりやすく言えば)授業参観日。
息子のいない息子のクラスの国語の授業と、娘の算数の授業、および、三時間目ののど自慢大会(で娘が登場するまで)を見学。しかし、立ったまま授業を見ていて倒れそうになったぐらい眠いぞ。
授業参観をした後、いそいそと一人で錦糸町のヨドバシカメラへ Go。結局、持った感じとかを考慮して、COOLPIX 2001を購入。あと、単三型のニッケル水素電池キットと 128MByte の CF カード。冷蔵庫のポイントじゃ全然足りませんな。^^;;;
しかし、購入するときに店員とまったく意思の疎通が出来なかったな。mMByte のストレージには n万画素のデータが何枚保存できるという一覧表について、実験の条件を聞いたんだけど、ムチャな質問だったよな。
本当は卓球があったのだが、あまりに疲れていて、かつ、眠いため、女房まかせでおいらはパス。おかげで、15:30-17:00 の間、昼寝ができた。幸せ。
20:00 から子供会の役員会で町会の会館へ。今年度二回目なのだが、ぼくは初めての参加であった。しかし、今月は子供会の行事が多くて、結構大変だ。
自宅の 5年目の定期検査。特に問題なく、外装の吹き付けの状態も良好とのこと。安心。
衣替えというわけでもないのだが、洋服ダンス系の整理を 2時間ほど。うちは、ぼくも女房もあまり(というかまったく)洋服を持っていないのだがそれでも大変。ぼくは古めのを結構すてた。梅雨前にやれてよかったよ。
家族で焼肉屋。息子の手術に向けて元気づけ。
○ いなりずしって、町の和菓子屋さんじゃなかったらどこで売っているんだろう?惣菜屋さんかな?ちなみに高級な和菓子屋さんには当然ですがいなりずしは売っていません。あくまで *町の* 和菓子屋さん。そういうところは赤飯(のおにぎり)とかもお団子と一緒に売っていたりする。
○ うどんのつゆが透明なのは問題ないけど、そばでそこが見えたらいやです。ついでに薬味が青ねぎなんて最低 :-<
#!/bin/shiraiってなっていた。irai が多過ぎ。疲れているみたい、はぁ。
昨日は久しぶりの会社の同期会でありました。20年ぶりぐらいにあった人もいたりして楽しかったよん。
ずーーと、今年は入社 21年目だと思っていたんだけど、実は 22年とのこと。いつから計算間違っていたんだかって、冷静に考えたら 22年目だなぁ、やっぱり。
その後、80〜90m 権之助坂を下りて、大場くんご夫妻と himiっちと合流して飲み継続。若い人たち(?)と飲むのは久しぶりだったので、こっちも楽しかったよん。
この前 Google Calendar を閲覧専用で使い出したばかりだが、知らない間に Google NoteBook というのもあるのね。これ、携帯電話から見られればメモ書きとしても便利かも。
というか、emacs で読み書きしたいんですけど。という以前に Zaurus 上で動くブラウザは全滅だぁ。世知辛い世の中だ。。。携帯電話対応を待つか。。。
(add-hook 'remix-setup-hook
(lambda ()
(define-key remix-its-mode-map "\C-q" 'remix-kick-convert-with-ascii)))
(defun remix-kick-convert-with-ascii ()
"ascii のまま漢字変換を呼び出す。"
(interactive)
(remix-end-of-input-buffer t)
;; ascii => 漢字変換
(let ((inhibit-read-only t)
(buffer-invisibility-spec nil)
(cursor (buffer-substring (point) (1+ (point))))
(seq (get-text-property (point) 'remix-keyseq-before))
region)
(remix-delete-cursor)
(save-excursion
(goto-char (remix-search-end-fence))
(insert cursor))
(setq region (remix-delete-fence))
(when (/= (car region) (cdr region))
(remix-set-usrdict seq 0)
(delete-region (car region) (cdr region))
(goto-char (car region))
(insert seq)
(egg-convert-region (car region) (point)
(get-text-property 0 'remix-context cursor)))))
(defadvice remix-chop-head-keyseq (around guard-error activate)
"ascii ダイレクト変換キャンセル時のエラーガード"
(let ((original seq))
(condition-case err
ad-do-it
(error
(setq ad-return-value original)))))
これで、何か適当に打って C-q を打つと ascii からの直接変換ができる。
△ おおむらゆう [うちの奥さん(関西出身)はちくわぶの存在を知りませんでした。]