diff options
| author | Roland McGrath | 1993-04-07 20:58:20 +0000 |
|---|---|---|
| committer | Roland McGrath | 1993-04-07 20:58:20 +0000 |
| commit | 0e8ec8d0cc8e4145616d83f499c8a5b9ea95807b (patch) | |
| tree | ac26a482488191165c23bcc55e7427089ad347ad | |
| parent | af56dc7eed8128c5ffb1d6d14d9f74637c796bfa (diff) | |
| download | emacs-0e8ec8d0cc8e4145616d83f499c8a5b9ea95807b.tar.gz emacs-0e8ec8d0cc8e4145616d83f499c8a5b9ea95807b.zip | |
(compile-internal): Initialize the process-mark.
| -rw-r--r-- | lisp/progmodes/compile.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/progmodes/compile.el b/lisp/progmodes/compile.el index bf860e6c38f..22d60916ac7 100644 --- a/lisp/progmodes/compile.el +++ b/lisp/progmodes/compile.el | |||
| @@ -322,6 +322,7 @@ Returns the compilation buffer created." | |||
| 322 | command))) | 322 | command))) |
| 323 | (set-process-sentinel proc 'compilation-sentinel) | 323 | (set-process-sentinel proc 'compilation-sentinel) |
| 324 | (set-process-filter proc 'compilation-filter) | 324 | (set-process-filter proc 'compilation-filter) |
| 325 | (set-marker (process-mark proc) (point) outbuf) | ||
| 325 | (setq compilation-in-progress (cons proc compilation-in-progress)))) | 326 | (setq compilation-in-progress (cons proc compilation-in-progress)))) |
| 326 | ;; Make it so the next C-x ` will use this buffer. | 327 | ;; Make it so the next C-x ` will use this buffer. |
| 327 | (setq compilation-last-buffer outbuf))) | 328 | (setq compilation-last-buffer outbuf))) |