diff options
| author | Roland McGrath | 1992-08-04 22:31:21 +0000 |
|---|---|---|
| committer | Roland McGrath | 1992-08-04 22:31:21 +0000 |
| commit | 9cac31b8423b3d4afbb2d3ad1dfc9bc80ecf085f (patch) | |
| tree | 01abde8640fd5dfde84ba71669200cf26cfa439d | |
| parent | dadb11fbc1c6d8576ae50260a385848d18481de6 (diff) | |
| download | emacs-9cac31b8423b3d4afbb2d3ad1dfc9bc80ecf085f.tar.gz emacs-9cac31b8423b3d4afbb2d3ad1dfc9bc80ecf085f.zip | |
*** empty log message ***
| -rw-r--r-- | lisp/progmodes/compile.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/progmodes/compile.el b/lisp/progmodes/compile.el index a6ba39450bc..9a718924877 100644 --- a/lisp/progmodes/compile.el +++ b/lisp/progmodes/compile.el | |||
| @@ -467,12 +467,12 @@ Does NOT find the source line like \\[next-error]." | |||
| 467 | (compile-file-of-error | 467 | (compile-file-of-error |
| 468 | (car (or errors | 468 | (car (or errors |
| 469 | (if reversed | 469 | (if reversed |
| 470 | (error "This is the first erring file") | 470 | (error "%s the first erring file" file) |
| 471 | (let ((compilation-error-list nil)) | 471 | (let ((compilation-error-list nil)) |
| 472 | ;; Parse some more. | 472 | ;; Parse some more. |
| 473 | (compile-reinitialize-errors nil nil 2) | 473 | (compile-reinitialize-errors nil nil 2) |
| 474 | (setq errors compilation-error-list))) | 474 | (setq errors compilation-error-list))) |
| 475 | (error "This is the last erring file"))))) | 475 | (error "%s is the last erring file" file))))) |
| 476 | (setq errors (cdr errors))) | 476 | (setq errors (cdr errors))) |
| 477 | 477 | ||
| 478 | (setq n (1- n))) | 478 | (setq n (1- n))) |