mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

* lisp/cedet/ede/proj-elisp.el (project-compile-target): Fix previous change.

Browse source
This commit is contained in:
Glenn Morris 2010-10-31 15:55:44 -07:00
parent a8336650b8
commit 39a766fba6
2 changed files with 4 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

1
lisp/cedet/ChangeLog
View file

@ -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>

9
lisp/cedet/ede/proj-elisp.el
View file

@ -129,15 +129,13 @@ Bonus: Return a cons cell: (COMPILED . UPTODATE)."
(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 @@ Argument THIS is the target which needs to insert an info file."
(provide 'ede/proj-elisp)
;; arch-tag: 3802c94b-d04d-4ecf-9bab-b29ed6e77588
;;; ede/proj-elisp.el ends here