diff options
| author | Glenn Morris | 2015-06-16 20:45:35 -0400 |
|---|---|---|
| committer | Glenn Morris | 2015-06-16 20:45:35 -0400 |
| commit | b7d5033c39b82d8ae6cde701edcbf94f1575a622 (patch) | |
| tree | 565fd38f9cccd79fce815e832ee0600fc4d77058 | |
| parent | d3b779fa79f3570879b2df2effa683c3b4aaa96a (diff) | |
| download | emacs-b7d5033c39b82d8ae6cde701edcbf94f1575a622.tar.gz emacs-b7d5033c39b82d8ae6cde701edcbf94f1575a622.zip | |
* lisp/emacs-lisp/check-declare.el (check-declare-warn):
Don't print filename twice (it's in the prefix now).
| -rw-r--r-- | lisp/emacs-lisp/check-declare.el | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/lisp/emacs-lisp/check-declare.el b/lisp/emacs-lisp/check-declare.el index ecdb6d8983c..ea865f22f57 100644 --- a/lisp/emacs-lisp/check-declare.el +++ b/lisp/emacs-lisp/check-declare.el | |||
| @@ -279,10 +279,8 @@ TYPE is a string giving the nature of the error. Warning is displayed in | |||
| 279 | entry)) | 279 | entry)) |
| 280 | (warning-fill-prefix " ")) | 280 | (warning-fill-prefix " ")) |
| 281 | (display-warning 'check-declare | 281 | (display-warning 'check-declare |
| 282 | (format "%s said `%s' was defined in %s: %s" | 282 | (format "said `%s' was defined in %s: %s" |
| 283 | (file-name-nondirectory file) fn | 283 | fn (file-name-nondirectory fnfile) type) |
| 284 | (file-name-nondirectory fnfile) | ||
| 285 | type) | ||
| 286 | nil check-declare-warning-buffer))) | 284 | nil check-declare-warning-buffer))) |
| 287 | 285 | ||
| 288 | (declare-function compilation-forget-errors "compile" ()) | 286 | (declare-function compilation-forget-errors "compile" ()) |