diff options
| author | Richard M. Stallman | 2003-09-19 14:29:42 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 2003-09-19 14:29:42 +0000 |
| commit | 2c0696b144c468d8ec3eb5eba8a24f176a9d417e (patch) | |
| tree | f1bfb5b6a999f02fa0bf1dc44d178ce355ba0588 | |
| parent | dcd70a815b0f7a6538a533237ab5b0b33eeda24a (diff) | |
| download | emacs-2c0696b144c468d8ec3eb5eba8a24f176a9d417e.tar.gz emacs-2c0696b144c468d8ec3eb5eba8a24f176a9d417e.zip | |
(byte-compile-warning-prefix):
Fix the condition for whether to print "In WHERE".
| -rw-r--r-- | lisp/emacs-lisp/bytecomp.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el index 077c68523c2..743ebea3c1e 100644 --- a/lisp/emacs-lisp/bytecomp.el +++ b/lisp/emacs-lisp/bytecomp.el | |||
| @@ -10,7 +10,7 @@ | |||
| 10 | 10 | ||
| 11 | ;;; This version incorporates changes up to version 2.10 of the | 11 | ;;; This version incorporates changes up to version 2.10 of the |
| 12 | ;;; Zawinski-Furuseth compiler. | 12 | ;;; Zawinski-Furuseth compiler. |
| 13 | (defconst byte-compile-version "$Revision: 2.136 $") | 13 | (defconst byte-compile-version "$Revision: 2.137 $") |
| 14 | 14 | ||
| 15 | ;; This file is part of GNU Emacs. | 15 | ;; This file is part of GNU Emacs. |
| 16 | 16 | ||
| @@ -929,7 +929,7 @@ Each function's symbol gets marked with the `byte-compile-noruntime' property." | |||
| 929 | (when (or (and byte-compile-current-file | 929 | (when (or (and byte-compile-current-file |
| 930 | (not (equal byte-compile-current-file | 930 | (not (equal byte-compile-current-file |
| 931 | byte-compile-last-logged-file))) | 931 | byte-compile-last-logged-file))) |
| 932 | (and byte-compile-last-warned-form | 932 | (and byte-compile-current-form |
| 933 | (not (eq byte-compile-current-form | 933 | (not (eq byte-compile-current-form |
| 934 | byte-compile-last-warned-form)))) | 934 | byte-compile-last-warned-form)))) |
| 935 | (insert (format "\nIn %s:\n" form))) | 935 | (insert (format "\nIn %s:\n" form))) |