猫熊は燃えつきた？！日記

○ ちょっと熱っぽい

ので早く帰ってきたが、体温測ったら 36.8℃しかない。けど、折角なので早く寝ることにする、寝不足だし。

○ 本屋

折角、本屋の空いている時間に帰ってきたので、帰り道に地元の本屋に寄る。

• Linux Magazin (話題のとこだけ立ち読み)
• モバイルプレス (すまん、これもここだけ立ち読みだ)
• アサヒカメラ (これは購入)

○ Mews？

今気付いたんだけど、ここ Mews ってなっている。M でそろえたの？Mew の複数形？薬用石鹸？News の typo？とか馬鹿なことを悩んでいたら、なんてことはない、こんな意味だったのね。Freetalk で騒がなくて良かったぞ。

○ egg-anthy で記号の全角が出ない

という問題でお困りの方は anthy-8521 以降を使ってくださいませ。直してもらいました。

○ まだまだ続く menudiag.el

アルファベットや記号でそのまま入力継続。っていうのに対応したけど、一日使ったところ、数字キーとその他で挙動が違うのが、少々気に入らなかった。
で以下の方法を考えてみたのだが、今日以降の menudiag.el を持ってきて、

;; (setq menudiag-start-number-1 t)
(setq menudiag-select-without-return t)
(setq menudiag-select-and-auto-continue t)
  
(add-hook 'menudiag-mode-map-setup-hook 'menudiag-mode-map-setup-numkey)
  
(defun menudiag-mode-map-setup-numkey ()
  (let ((i 0)
	(key ?\M-0))
    (while (< i 10)
      (define-key menudiag-mode-map (vector (+ key i)) 'menudiag-goto-metactl-item)
      (setq i (1+ i)))
    (setq i 0)
    (setq key ?\C-0)
    (while (< i 10)
      (define-key menudiag-mode-map (vector (+ key i)) 'menudiag-goto-metactl-item)
      (setq i (1+ i)))
    (setq i 0)
    (setq key ?0)
    (while (< i 10)
      (define-key menudiag-mode-map (vector (+ key i)) 'menudiag-select-and-continue)
      (setq i (1+ i)))))
  
(defun menudiag-goto-metactl-item ()
  (interactive)
  (let ((num (logand last-command-char ?\177)))
    (setq last-command-char num)
    (when (eq last-command  'menudiag-escape-keyin)
      (setq last-command this-command))
    (call-interactively 'menudiag-goto-item)))

と ~/.emacs でしておくと、0,1,2... キーも選択確定＋そのキー入力継続になる。また、その代わりにに C-数字、M-数字で、直接その番号の候補を入力できる。
さすがに menudiag.el に入れ込むのは止めたが、ちょっとやりすぎかも？

○ 納豆

納豆で痩せるんだったら、ぼくなどはとっくの昔に痩せているとは思うぞ。だけど、納豆がおいしくて(おそらく)体にも良いのは間違いないけどね。

ちなみに、ぼくは、小粒納豆、ひき割り納豆、納豆のタレは嫌い。大粒に醤油が一番！！

○ あるある大辞典

見た記憶が全然無いんだけど、女房に言わせると過去何回かはぼくと一緒に見ているそうだ。「あるある」っていうと、「クイズ１００人に聞きました」のお客さんの声と関口浩氏しか思い出さないぞ。