[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[PATCH 3/4] Use byte-recompile-file in cedet/project-compile-target
From: |
Julien Danjou |
Subject: |
[PATCH 3/4] Use byte-recompile-file in cedet/project-compile-target |
Date: |
Tue, 21 Sep 2010 17:26:09 +0200 |
Signed-off-by: Julien Danjou <address@hidden>
---
lisp/ChangeLog | 2 ++
lisp/cedet/semantic/ede-grammar.el | 5 +----
2 files changed, 3 insertions(+), 4 deletions(-)
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 175286b..4f0aaac 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
2010-09-21 Julien Danjou <address@hidden>
+ * cedet/semantic/ede-grammar.el: Use `byte-recompile-file'.
+
* emacs-lisp/lisp-mode.el (emacs-lisp-byte-compile-and-load): Use
`byte-recompile-file'.
diff --git a/lisp/cedet/semantic/ede-grammar.el
b/lisp/cedet/semantic/ede-grammar.el
index 184e23c..ac99588 100644
--- a/lisp/cedet/semantic/ede-grammar.el
+++ b/lisp/cedet/semantic/ede-grammar.el
@@ -133,10 +133,7 @@ Lays claim to all -by.el, and -wy.el files."
(save-excursion
(semantic-grammar-create-package))
(save-buffer)
- (let ((cf (concat (semantic-grammar-package) ".el")))
- (if (or (not (file-exists-p cf))
- (file-newer-than-file-p src cf))
- (byte-compile-file cf)))))
+ (byte-recompile-file (concat (semantic-grammar-package) ".el")
nil 0))
(oref obj source)))
(message "All Semantic Grammar sources are up to date in %s" (object-name
obj)))
--
1.7.1