byte-compile-warning-prefix tweak
* lisp/emacs-lisp/bytecomp.el (byte-compile-warning-prefix): If not compiling a file, try using load-file-name.
This commit is contained in:
parent
c0c54fbddf
commit
2168fe4f2a
2 changed files with 9 additions and 0 deletions
|
@ -1,3 +1,8 @@
|
|||
2012-09-13 Glenn Morris <rgm@gnu.org>
|
||||
|
||||
* emacs-lisp/bytecomp.el (byte-compile-warning-prefix):
|
||||
If not compiling a file, try using load-file-name.
|
||||
|
||||
2012-09-13 Stefan Monnier <monnier@iro.umontreal.ca>
|
||||
|
||||
* emacs-lisp/edebug.el (edebug-outside-unread-command-events):
|
||||
|
|
|
@ -1016,6 +1016,10 @@ Each function's symbol gets added to `byte-compile-noruntime-functions'."
|
|||
((bufferp byte-compile-current-file)
|
||||
(format "Buffer %s:"
|
||||
(buffer-name byte-compile-current-file)))
|
||||
;; We might be simply loading a file that
|
||||
;; contains explicit calls to byte-compile functions.
|
||||
((stringp load-file-name)
|
||||
(format "%s:" (file-relative-name load-file-name dir)))
|
||||
(t "")))
|
||||
(pos (if (and byte-compile-current-file
|
||||
(integerp byte-compile-read-position))
|
||||
|
|
Loading…
Add table
Reference in a new issue