Mercurial > hg > xemacs-beta

comparison lisp/prim/update-elc.el @ 185:3d6bfa290dbd r20-3b19

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-3b19
author cvs
date Mon, 13 Aug 2007 09:55:28 +0200
parents e121b013d1f0
children 489f57a838ef
comparison
equal deleted inserted replaced
184:bcd2674570bf 185:3d6bfa290dbd
44 44
45 ;;; Code: 45 ;;; Code:
46 46
47 (defvar processed nil) 47 (defvar processed nil)
48 (defvar update-elc-files-to-compile nil) 48 (defvar update-elc-files-to-compile nil)
49
50 ;; BOGUS
51 (defvar find-file-hooks nil)
52 49
53 ;(setq update-elc-files-to-compile 50 ;(setq update-elc-files-to-compile
54 ; (delq nil 51 ; (delq nil
55 ; (mapcar (function 52 ; (mapcar (function
56 ; (lambda (x) 53 ; (lambda (x)
136 "-l" "bytecomp" "-f" "batch-byte-compile") 133 "-l" "bytecomp" "-f" "batch-byte-compile")
137 update-elc-files-to-compile)) 134 update-elc-files-to-compile))
138 (load "loadup-el.el")) 135 (load "loadup-el.el"))
139 (condition-case nil 136 (condition-case nil
140 (delete-file "./NOBYTECOMPILE") 137 (delete-file "./NOBYTECOMPILE")
141 (t nil))) 138 (file-error nil)))
142 139
143 (kill-emacs) 140 (kill-emacs)
144 141
145 ;;; update-elc.el ends here 142 ;;; update-elc.el ends here