[gnus git] branch master updated: m0-11-125-gb5dbae8 =1= * lisp/gnus-compat.el (fboundp): Avoid compilation error on XEmacs.
Lars <[email protected]> Tue, 27 Jan 2015 07:22:23 +0100
| Newsgroups | gmane.emacs.gnus.cvs |
|---|---|
| Message-ID | <[email protected]> |
via b5dbae8d6c78bdbb1b47601ddc91fca012796927 (commit)
from b2c3cb743302b2435b8c179948a4e5251a1da380 (commit)
- Log -----------------------------------------------------------------
commit b5dbae8d6c78bdbb1b47601ddc91fca012796927
Author: Lars Magne Ingebrigtsen <[email protected]>
Date: Tue Jan 27 17:22:12 2015 +1100
* lisp/gnus-compat.el (fboundp): Avoid compilation error on XEmacs.
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 58c883e..bc8f44b 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
2015-01-27 Lars Ingebrigtsen <[email protected]>
+ * gnus-compat.el (fboundp): Avoid compilation error on XEmacs.
+
* nnir.el (nnir-imap-expr-to-imap): Check for literal+ capability in
IMAP.
diff --git a/lisp/gnus-compat.el b/lisp/gnus-compat.el
index 3eac265..86bcb8f 100644
--- a/lisp/gnus-compat.el
+++ b/lisp/gnus-compat.el
@@ -144,6 +144,11 @@ one is kept."
(unless (fboundp 'declare-function)
(defmacro declare-function (&rest r)))
+(unless (fboundp 'string-bytes)
+ (defun string-bytes (string)
+ ;; This is a rather wrong definition that should be fixed.
+ (length string)))
+
(provide 'gnus-compat)
;; gnus-compat.el ends here
-----------------------------------------------------------------------
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 | 2 ++
lisp/gnus-compat.el | 5 +++++
2 files changed, 7 insertions(+)
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