[xyzzy:08439] Re: 終了状態復元とcvs-mode

[IWATSUKI Hiroyuki <don@xxxxxxxxxxxx>]

岩月と申します。自己リプライで失礼します。

IWATSUKI Hiroyuki <don@xxxxxxxxxxxx> wrote:

> (defun cvs-reload ()
>   (cvs-reload-run (buffer-list)))
> (defun cvs-reload-run (list)
>   (let ((buffer (car list)))
>     (if (not (null buffer))
> 	(progn
> 	  (set-buffer buffer)
> 	  (cvs:cvs-mode)
> 	  (cvs-reload-run (cdr list))))))
> (add-hook '*post-startup-hook* 'cvs-reload)

cvs:cvs-modeを使いますと(理由はわかりませんが)不具合(checkin時に
操作が帰ってこない。checkin事態は成功している)がありましたので、
現在はcvs::open-fileを使っています。これで通常find-file時に
cvs-modeが適用されるのと同じ動作になったはずです(多分)。

--
岩月 博之(at 会社) <don@xxxxxxxxxxxx>