[gnus git] branch master updated: m0-11-162-g971bd0f =1= Avoid compilation error on Emacs 23

       via  971bd0f446cb5cd9844f55fe0ae46754c111e0b7 (commit)
      from  2b1216b212947dc91ee6c7990fdbead9f51d670a (commit)


- Log -----------------------------------------------------------------
commit 971bd0f446cb5cd9844f55fe0ae46754c111e0b7
Author: Lars Magne Ingebrigtsen <[email protected]>
Date:   Sun Feb 15 15:50:31 2015 +1100

    Avoid compilation error on Emacs 23
    
    * gnus-compat.el (process-live-p): Added new compat function for Emacs
    23.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 91643d1..b185292 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2015-02-15  Lars Ingebrigtsen  <[email protected]>
+
+	* gnus-compat.el (process-live-p): Added new compat function for Emacs
+	23.
+
 2015-02-14  Lars Ingebrigtsen  <[email protected]>
 
 	* nnimap.el (nnimap-retrieve-headers): If the server closes connection
diff --git a/lisp/gnus-compat.el b/lisp/gnus-compat.el
index 1d8a2b3..b96a6ac 100644
--- a/lisp/gnus-compat.el
+++ b/lisp/gnus-compat.el
@@ -153,6 +153,16 @@ one is kept."
 		(mm-encode-coding-string string 'utf-8)
 	      string))))
 
+(unless (fboundp 'process-live-p)
+  (defun process-live-p (process)
+    "Returns non-nil if PROCESS is alive.
+A process is considered alive if its status is `run', `open',
+`listen', `connect' or `stop'.  Value is nil if PROCESS is not a
+process."
+    (and (processp process)
+	 (memq (process-status process)
+	       '(run open listen connect stop)))))
+
 (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      |    5 +++++
 lisp/gnus-compat.el |   10 ++++++++++
 2 files changed, 15 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