[xyzzy:04079] お世話になっています

[kuni <vq7k-ogr@xxxxxxxxxxxxxxx>]

どんな偶然からだったか、xyzzy に初めて出会ったのは 0_0_0_72_1
というバージョンのころでした。以来、愛用させていただいています。
開発にかかわっているみなさまに感謝いたします。

つい先日、C-x C-c のデフォルトを変更できるプログラムが参考として
提示されていました。早速に、これまた利用させていただき、快適に
過ごしていたところですが、0.2.0.123 にバージョンアップしたところ
動きがデフォルトに戻ってしまいました。

知識があれば、ちょいと ~/.xyzzy を書き換えるだけで済むのでしょうが、
如何せん自分では何もできない一方的利用者なもので、分かりません。
どうぞ、修正個所をご教示ください。
なお、0.1.2.120 では快調に動いていました。

(defun query-kill-xyzzy ()
  (handler-case
      (save-excursion
	(dolist (buffer (buffer-list))
	  (when (need-buffer-save-p buffer)
	    (set-buffer buffer)
	    (refresh-screen)
	    (cond ((yes-no-or-cancel-p "~a~%は変更されちょります。保存しますか?"
				       (if (file-visited-p) (get-buffer-file-name) buffer))
		   (call-interactively (if (file-visited-p) 'save-buffer 'write-file)))
		  ((no-or-yes-p "ほんまにええのん?")
		   (not-modified))
		  (t
		   (quit)))))
	t)
    (quit () nil)
    (error () nil))) 

(add-hook '*query-kill-xyzzy-hook* 'query-kill-xyzzy)

----
くに
Email   vq7k-ogr@xxxxxxxxxxxxxxx