(compile-auto-highlight): Default now t.

(compile): Doc fix.
(compilation-next-error): Fix previous change.

diff --git a/lisp/progmodes/compile.el b/lisp/progmodes/compile.el
index eebeedd1710f7b81d21309a3981960b8f7dde33f..366f1dedc180b4aa0e4c875b9c035c15fb51cebe 100644 (file)
--- a/lisp/progmodes/compile.el
+++ b/lisp/progmodes/compile.el
@@ -50,7 +50,7 @@
                 integer)
   :group 'compilation)
 
-(defcustom compile-auto-highlight nil
+(defcustom compile-auto-highlight t
   "*Specify how many compiler errors to highlight (and parse) initially.
 \(Highlighting applies to an error message when the mouse is over it.)
 If this is a number N, all compiler error messages in the first N lines
@@ -644,9 +644,11 @@ and move to the source code that caused it.
 Interactively, prompts for the command if `compilation-read-command' is
 non-nil; otherwise uses `compile-command'.  With prefix arg, always prompts.
 
-To run more than one compilation at once, start one and rename the
-\`*compilation*' buffer to some other name with \\[rename-buffer].
-Then start the next one.
+To run more than one compilation at once, start one and rename
+the \`*compilation*' buffer to some other name with
+\\[rename-buffer].  Then start the next one.  On most systems,
+termination of the main compilation process kills its
+subprocesses.
 
 The name used for the buffer is actually whatever is returned by
 the function in `compilation-buffer-name-function', so you can set that
@@ -1408,9 +1410,9 @@ Does NOT find the source line like \\[next-error]."
                              (error "Moved back past first error")
                            (nth (+ i n) compilation-old-error-list)))
                      (save-excursion
-                       (while (> n 0)
+                       (while (and (> n 0) errors)
                          ;; Discard the current error and any previous.
-                         (while (>= (point) (car (car errors)))
+                         (while (and errors (>= (point) (car (car errors))))
                            (setq errors (cdr errors)))
                          ;; Now (car errors) is the next error.
                          ;; If we want to move down more errors,