[xyzzy:03607] errors.l

[masahito henmi <henmi@xxxxxxxxxxxxx>]

亀井さん、こんにちは。
ひまな時でいいので、errors.lの４を変数にしてもらえないでしょうか？

(defun goto-error (next)
  (when (and next *error-list*)
    (setq *rerror-list* (cons (car *error-list*) *rerror-list*))
    (setq *error-list* (cdr *error-list*)))
  (when (and *rerror-list*
	     (null *error-list*))
    (rebuild-error-list))
  (when *error-list*
    (let ((error (car *error-list*)))
      (if (= (count-windows 'arg) 1)
	  (progn
	    (split-window 4)
                          ↑----ここです。


------------------------------------------------------------
逸見雅人    Masahito Henmi  henmi@xxxxxxxxxxxxx
♪あなたの願いも仕事もうまくいきますように・・・