Mercurial > emacs
changeset 111274:f746433112ea
* lisp/cedet/ede/proj-elisp.el (project-compile-target): Fix previous change.
| author | Glenn Morris <rgm@gnu.org> |
|---|---|
| date | Sun, 31 Oct 2010 15:55:44 -0700 |
| parents | 43d891f84e91 |
| children | 393b44bc9757 |
| files | lisp/cedet/ChangeLog lisp/cedet/ede/proj-elisp.el |
| diffstat | 2 files changed, 4 insertions(+), 6 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/cedet/ChangeLog Sun Oct 31 22:49:28 2010 +0000 +++ b/lisp/cedet/ChangeLog Sun Oct 31 15:55:44 2010 -0700 @@ -1,5 +1,6 @@ 2010-10-31 Glenn Morris <rgm@gnu.org> + * ede/proj-elisp.el (project-compile-target): Fix previous change. * semantic/ede-grammar.el (project-compile-target): Fix previous change. 2010-10-31 Julien Danjou <julien@danjou.info>
--- a/lisp/cedet/ede/proj-elisp.el Sun Oct 31 22:49:28 2010 +0000 +++ b/lisp/cedet/ede/proj-elisp.el Sun Oct 31 15:55:44 2010 -0700 @@ -129,15 +129,13 @@ (utd 0)) (mapc (lambda (src) (let* ((fsrc (expand-file-name src dir)) - (elc (concat (file-name-sans-extension fsrc) ".elc")) - ) - (if (eq (byte-recompile-file fsrc nil 0)) t) + (elc (concat (file-name-sans-extension fsrc) ".elc"))) + (if (eq (byte-recompile-file fsrc nil 0) t) (setq comp (1+ comp)) (setq utd (1+ utd))))) (oref obj source)) (message "All Emacs Lisp sources are up to date in %s" (object-name obj)) - (cons comp utd) - )) + (cons comp utd))) (defmethod ede-update-version-in-source ((this ede-proj-target-elisp) version) "In a Lisp file, updated a version string for THIS to VERSION. @@ -387,5 +385,4 @@ (provide 'ede/proj-elisp) -;; arch-tag: 3802c94b-d04d-4ecf-9bab-b29ed6e77588 ;;; ede/proj-elisp.el ends here