hns - 日記自動生成システム - Version 2.19.9

先月 2004年02月 来月
1 2 3 4 5 6 7
8 9 10 11 12 13 14
15 16 17 18 19 20 21
22 23 24 25 26 27 28
29
Namazu for hns による簡易全文検索
詳しくは 詳細指定/ヘルプを参照して下さい
検索式:

2004年02月06日(金) 旧暦 [n年日記]

#1 [Emacs] wl-2.10.1/wl-draft.el

2075 行から
(defun wl-draft-config-exec (&optional config-alist reply-buf)
...
   (when (and (or (interactive-p)
                   wl-draft-config-exec-flag)
               alist)
      (save-excursion
        (catch 'done
          (while alist
            (setq key (caar alist)
                  clist (cdar alist))
            (cond
             ((eq key 'reply)
...
             ((stringp key)
...
            ((eval key)
             (wl-append local-variables
                        (wl-draft-config-exec-sub clist))
              (setq found t)))
            (if (and found wl-draft-config-matchone)
                (throw 'done t))
            (setq alist (cdr alist))))
ここんとこ、合っているのかなぁという思いが。

eval の使い方:

(progn
  (setq a nil)
  (setq text '(setq a "a-value"))
  (princ a)
  (princ " (1)\n")
  (eval text)
  (princ a)
  (princ " (2)\n")
  nil
) ..... C-j
nil (1)
a-value (2)
nil
↑は(いつものように)僕の勘違い。見るべきは wl-draft-config-exec-sub の中だった。

lambda を使うのが正しいのかな。:

実はこれがやりたかっただけ。 wl-draft-colnfig-alist の中で:
((string-match  "to/home" wl-draft-parent-folder)
 ("From" .  "藤原 誠/ Makoto Fujiwara <hoge.foo@example.com>")
 (lambda () 
   (setq wl-x-face-file "~/.xface")
   (setq wl-auto-insert-x-face nil)
   (message "executing lambda expression") ))
↑ちょっと冗長ではある。(というか一行目は意味がない) それと、 wl-auto-insert-x-face って buffer local になってくれているのかな。 .. なってないようなので、上の方法はうまくない。
x-face を切替えるだけだったら、そういう名前も使えるらしいが。

wl-draft-config-alist ばんざい:

という感じで。... と思ったが、ちょっと時期の問題がある。 上のやり方では間に合わず、一つ後で draft を作る時に初めて有効に なる。
やはり x-face の名前で指定する方法が良い。

#2 [Emacs] apropos-command と apropos-symbol

C-h a って apropos-command
M-x apropos は apropos-symbol
なのかな。知らなかった ? ...
C-u C-h a が apropos command or function



最近の日記
2019年08月14日
bulklog/rust-1.36.0nb1/install.log
completed with error 5
2019年06月28日
config-set for 8.99.45
2019年05月05日
graphic monitor for bulkbuild count
2019年03月31日
xfce added
2019年03月29日
bulkbuild 8.99.36
以上、1 日分です。
タイトル一覧
カテゴリ分類
Powered by hns-2.19.9, HyperNikkiSystem Project

Count.cgi (since 2000/02/05)