[gnus git] branch master updated: m0-13-42-g20b0ec9 =1= message.el: Silent the byte compiler
Katsumi Yamaoka <[email protected]> Tue, 18 Aug 2015 03:36:07 +0200
| Newsgroups | gmane.emacs.gnus.cvs |
|---|---|
| Message-ID | <[email protected]> |
via 20b0ec9f107f8198efc247a4a6ae76d21f89bafd (commit)
from 6c0308e124c47cdf7efbd8512089904b05f33d9b (commit)
- Log -----------------------------------------------------------------
commit 20b0ec9f107f8198efc247a4a6ae76d21f89bafd
Author: Katsumi Yamaoka <[email protected]>
Date: Tue Aug 18 01:35:23 2015 +0000
message.el: Silent the byte compiler
* message.el (message-overlay-put, message-make-overlay)
(message-kill-all-overlays, message-overlays-in, message-overlay-get)
(message-delete-overlay, message-window-inside-pixel-edges):
Declare before using.
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 1453f60..515843c 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,10 @@
+2015-08-18 Katsumi Yamaoka <[email protected]>
+
+ * message.el (message-overlay-put, message-make-overlay)
+ (message-kill-all-overlays, message-overlays-in, message-overlay-get)
+ (message-delete-overlay, message-window-inside-pixel-edges):
+ Declare before using.
+
2015-08-17 Katsumi Yamaoka <[email protected]>
* message.el (message-overlay-get, message-overlays-in)
diff --git a/lisp/message.el b/lisp/message.el
index 9e54a94..59e3335 100644
--- a/lisp/message.el
+++ b/lisp/message.el
@@ -2049,6 +2049,22 @@ You must have the \"hashcash\" binary installed, see `hashcash-path'."
(unless (fboundp 'mail-dont-reply-to)
(defalias 'mail-dont-reply-to 'rmail-dont-reply-to))
+(eval-and-compile
+ (if (featurep 'emacs)
+ (progn
+ (defalias 'message-delete-overlay 'delete-overlay)
+ (defun message-kill-all-overlays ()
+ (mapcar #'delete-overlay (overlays-in (point-min) (point-max))))
+ (defalias 'message-make-overlay 'make-overlay)
+ (defalias 'message-overlay-get 'overlay-get)
+ (defalias 'message-overlay-put 'overlay-put)
+ (defalias 'message-overlays-in 'overlays-in)
+ (defalias 'message-window-inside-pixel-edges
+ 'window-inside-pixel-edges))
+ (defun message-kill-all-overlays ()
+ (map-extents (lambda (extent ignore) (delete-extent extent))))
+ (defalias 'message-window-inside-pixel-edges 'ignore)))
+
;;;
@@ -7929,20 +7945,6 @@ which specify the range to operate on."
(goto-char (prog1 (mark t)
(set-marker (mark-marker) (point)))))
-(if (featurep 'emacs)
- (progn
- (defalias 'message-delete-overlay 'delete-overlay)
- (defun message-kill-all-overlays ()
- (mapcar #'delete-overlay (overlays-in (point-min) (point-max))))
- (defalias 'message-make-overlay 'make-overlay)
- (defalias 'message-overlay-get 'overlay-get)
- (defalias 'message-overlay-put 'overlay-put)
- (defalias 'message-overlays-in 'overlays-in)
- (defalias 'message-window-inside-pixel-edges 'window-inside-pixel-edges))
- (defun message-kill-all-overlays ()
- (map-extents (lambda (extent ignore) (delete-extent extent))))
- (defalias 'message-window-inside-pixel-edges 'ignore))
-
;; Support for toolbar
(defvar tool-bar-mode)
-----------------------------------------------------------------------
Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we listed those
revisions in full, above.
Summary of changes:
lisp/ChangeLog | 7 +++++++
lisp/message.el | 30 ++++++++++++++++--------------
2 files changed, 23 insertions(+), 14 deletions(-)
This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "Gnus Project".
The branch, master has been updated
hooks/post-receive
--
Gnus Project