From: Glenn Morris <rgm@gnu.org>
Date: Wed, 19 Jun 2013 20:29:09 +0000 (-0400)
Subject: * lisp/cedet/semantic/idle.el (define-semantic-idle-service):
X-Git-Tag: emacs-24.3.90~173^2^2~42^2~45^2~387^2~2016^2~34
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=c5803bd730ef156328d78b7385bb1671c2927168;p=emacs.git

* lisp/cedet/semantic/idle.el (define-semantic-idle-service):
No need to use eval-and-compile, progn will do.
(eval-and-compile ends up causing spurious warnings.)
---

diff --git a/lisp/cedet/ChangeLog b/lisp/cedet/ChangeLog
index dca0aa9cb9f..30d516f778f 100644
--- a/lisp/cedet/ChangeLog
+++ b/lisp/cedet/ChangeLog
@@ -1,4 +1,7 @@
-2013-06-19  Glenn Morris  <rgm@gnu.org>
+2013-06-19  Glenn Morris  <rgm@fencepost.gnu.org>
+
+	* semantic/idle.el (define-semantic-idle-service):
+	No need to use eval-and-compile, progn will do.
 
 	* semantic/decorate/mode.el (define-semantic-decoration-style):
 	Doc fix.
diff --git a/lisp/cedet/semantic/idle.el b/lisp/cedet/semantic/idle.el
index 6c223c2b9f2..d024e5d8237 100644
--- a/lisp/cedet/semantic/idle.el
+++ b/lisp/cedet/semantic/idle.el
@@ -578,7 +578,7 @@ This routine creates the following functions and variables:"
 	(setup	(intern (concat (symbol-name name) "-mode-setup")))
 	(func	(intern (concat (symbol-name name) "-idle-function"))))
 
-    `(eval-and-compile
+    `(progn
        (define-minor-mode ,global
 	 ,(concat "Toggle " (symbol-name global) ".
 With ARG, turn the minor mode on if ARG is positive, off otherwise.