diff options
| author | Glenn Morris | 2009-12-01 03:14:02 +0000 |
|---|---|---|
| committer | Glenn Morris | 2009-12-01 03:14:02 +0000 |
| commit | 3ab4308bab268a0d5591823aca59d0dec85816be (patch) | |
| tree | 3f838e0b40a8cd3fc3087eb0e95e7104f4f3e116 | |
| parent | 0c9ff2c5167aac3358fe735a68e3472acbcf6e57 (diff) | |
| download | emacs-3ab4308bab268a0d5591823aca59d0dec85816be.tar.gz emacs-3ab4308bab268a0d5591823aca59d0dec85816be.zip | |
(byte-compile-save-excursion): Make message consistent with others (no
final period).
| -rw-r--r-- | lisp/ChangeLog | 3 | ||||
| -rw-r--r-- | lisp/emacs-lisp/bytecomp.el | 2 |
2 files changed, 4 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index ff79d3b3469..5d9edfb78c2 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,5 +1,8 @@ | |||
| 1 | 2009-12-01 Glenn Morris <rgm@gnu.org> | 1 | 2009-12-01 Glenn Morris <rgm@gnu.org> |
| 2 | 2 | ||
| 3 | * emacs-lisp/bytecomp.el (byte-compile-save-excursion): Make message | ||
| 4 | consistent with others (no final period). | ||
| 5 | |||
| 3 | * mail/rmailmm.el (rmail-mime-handle): Doc fix. | 6 | * mail/rmailmm.el (rmail-mime-handle): Doc fix. |
| 4 | (rmail-mime-show): Downcase the encoding. (Bug#5070) | 7 | (rmail-mime-show): Downcase the encoding. (Bug#5070) |
| 5 | 8 | ||
diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el index bf7c2c113f0..c633f7f6567 100644 --- a/lisp/emacs-lisp/bytecomp.el +++ b/lisp/emacs-lisp/bytecomp.el | |||
| @@ -3714,7 +3714,7 @@ that suppresses all warnings during execution of BODY." | |||
| 3714 | (defun byte-compile-save-excursion (form) | 3714 | (defun byte-compile-save-excursion (form) |
| 3715 | (if (and (eq 'set-buffer (car-safe (car-safe (cdr form)))) | 3715 | (if (and (eq 'set-buffer (car-safe (car-safe (cdr form)))) |
| 3716 | (byte-compile-warning-enabled-p 'suspicious)) | 3716 | (byte-compile-warning-enabled-p 'suspicious)) |
| 3717 | (byte-compile-warn "`save-excursion' defeated by `set-buffer'.")) | 3717 | (byte-compile-warn "`save-excursion' defeated by `set-buffer'")) |
| 3718 | (byte-compile-out 'byte-save-excursion 0) | 3718 | (byte-compile-out 'byte-save-excursion 0) |
| 3719 | (byte-compile-body-do-effect (cdr form)) | 3719 | (byte-compile-body-do-effect (cdr form)) |
| 3720 | (byte-compile-out 'byte-unbind 1)) | 3720 | (byte-compile-out 'byte-unbind 1)) |