田村です。 すみません、一行足りなかったです。 >(defun changelog-add-end () > (interactive) > (pop-to-buffer (get-buffer-create *changelog-buffer*) 15) ; 追加 (find-file *changelog-filename*):これも必要みたい > (save-buffer) > (set-window-configuration *changelog-winconf*) > (delete-buffer *changelog-buffer*)) 田村善満 zenman@xxxxxxxxxxxxxxxxxxxx