letの変数を書き換えとか（その３くらい(適当に合体）)

前と言うか、昨日かいてた奴を適当に合体。便利なときもありそうだけど。上手くキーと組み合わせないとキー割り当て的にもチョット微妙。

(defun replace-letvar(replacement)
  (interactive "*sChange:")
  (popup-list (get-letvar)
   #'(lambda (x)
	   (replace-let-string x replacement)
	   (refresh-screen))))

■この辺で書いたのを適当に合体しただけ。
himadatenodeの日記 - letの変数を書き換えとか
himadatenodeの日記 - letの変数を書き換えとか（その２）
himadatenodeの日記 - 修正したつもり
himadatenodeの日記 - その他の小物
一応、「letの変数を書き換えとか」の所で書いた現実的なラインにはなってると思う。妄想の方は面倒そうな上に変にやるとxyzzyが重たくなりそうなので放置。