From: Robin Templeton <robin@terpri.org>
Date: Sun, 22 Jun 2014 04:41:46 +0000 (-0400)
Subject: make gnus-byte-compile a nop
X-Git-Url: https://git.hcoop.net/bpt/emacs.git/commitdiff_plain/4c62200977c0483198ee28c4e1bb940e19300ee2

make gnus-byte-compile a nop
---

diff --git a/lisp/gnus/gnus-util.el b/lisp/gnus/gnus-util.el
index 62977576a0..1a0c9b9b6a 100644
--- a/lisp/gnus/gnus-util.el
+++ b/lisp/gnus/gnus-util.el
@@ -1449,19 +1449,7 @@ is run."
 
 (defun gnus-byte-compile (form)
   "Byte-compile FORM if `gnus-use-byte-compile' is non-nil."
-  (if gnus-use-byte-compile
-      (progn
-	(condition-case nil
-	    ;; Work around a bug in XEmacs 21.4
-	    (require 'byte-optimize)
-	  (error))
-	(require 'bytecomp)
-	(defalias 'gnus-byte-compile
-	  (lambda (form)
-	    (let ((byte-compile-warnings '(unresolved callargs redefine)))
-	      (byte-compile form))))
-	(gnus-byte-compile form))
-    form))
+  form)
 
 (defun gnus-remassoc (key alist)
   "Delete by side effect any elements of LIST whose car is `equal' to KEY.