[xyzzy:02381] Re: history-variable

[Seiya Suda <seiya.suda@xxxxxxxxxxx>]

亀井さん、こんにちは。

        Fri, 16 Apr 1999 22:09:22 +0900 の
        [xyzzy:02379] history-variable
        への自己レスです。

history-variableを使うのはむずいから、もしかしたら、こんなふうでいいかも。
(ただし、save-winconf.lをちょっと修正しなければだめですが)

---------------------------------------------------------
(defvar *save-winconf-file* "H:/root/.xyzzy-winconf")

(add-hook '*kill-xyzzy-hook*
		  (function
		   (lambda ()
			 (with-open-file (s *save-winconf-file*
								:direction :output
								:if-exists :supersede
								:if-does-not-exist :create)
			   (format s ";;; This file contains xyzzy's window configuration.~%")
			   (format s "(setq editor::*current-winconf*~%")
			   (format s "  '(~{~S~^~%    ~}))~%" *current-winconf*)))))

(add-hook '*post-startup-hook*
		  (function
		   (lambda ()
			 (load *save-winconf-file*)
			 (restore-winconf))))


#save-kbd-macro-alist を参考にしました。
--------
須田誠也(suda seiya)
seiya.suda@xxxxxxxxxxx
http://member.nifty.ne.jp/seiya-suda/