1463 |
;; If the current buffer is a compilation buffer, return it. |
;; If the current buffer is a compilation buffer, return it. |
1464 |
;; Otherwise, look for a compilation buffer and signal an error |
;; Otherwise, look for a compilation buffer and signal an error |
1465 |
;; if there are none. |
;; if there are none. |
1466 |
(defun compilation-find-buffer (&optional other-buffer) |
(defun compilation-find-buffer (&optional avoid-current) |
1467 |
(next-error-find-buffer other-buffer 'compilation-buffer-internal-p)) |
(next-error-find-buffer avoid-current 'compilation-buffer-internal-p)) |
1468 |
|
|
1469 |
;;;###autoload |
;;;###autoload |
1470 |
(defun compilation-next-error-function (n &optional reset) |
(defun compilation-next-error-function (n &optional reset) |