[xyzzy:02434] Re: den8-viewer
- Subject: [xyzzy:02434] Re: den8-viewer
- From: Seiya Suda <seiya.suda@xxxxxxxxxxx>
- X-mailer: Denshin 8 Go V321.2b5
- X-yzzy-version: 0.0.0.82
miiさん、こんにちは。
Wed, 28 Apr 1999 13:38:16 +0900 の
[xyzzy:02432] Re: den8-viewer
に関するメールにお答えします。
> ところで、den8-viewer を抜けるのには、どうするのが美しいのでしょうか。
> 現在、C-x C-k, C-x C-o, C-x C-k, C-x 1 こんなことしてますけど、
> かなり美しくないぁと思うこのごろです。
こっちではこんなのを作ってます。美しくはないけど。一例として。
参考になるかどうかわかりません(^^:
--------------------------------------------------------
(defun toggle-den8 ()
(interactive)
(if (and (find-buffer "*Den8 View*")
(find-buffer "*Den8 Summary*"))
(progn
(get-buffer-window "*Den8 View*")
(when (> (count-windows) 1)
(delete-window))
(set-buffer "*Den8 View*")
(delete-buffer (selected-buffer))
(message "Den8 View を終了しました")
(get-buffer-window "*Den8 Summary*")
(when (> (count-windows) 1)
(delete-window))
(set-buffer "*Den8 Summary*")
(delete-buffer (selected-buffer))
(message "Den8 Summary を終了しました"))
(den8-viewer)))
--------
須田誠也(suda seiya)
seiya.suda@xxxxxxxxxxx
http://member.nifty.ne.jp/seiya-suda/