Mercurial > hg > xemacs-beta
comparison lisp/update-elc-2.el @ 1261:465bd3c7d932
[xemacs-hg @ 2003-02-06 06:35:47 by ben]
various bug fixes
mule/cyril-util.el: Fix compile warning.
loadup.el, make-docfile.el, update-elc-2.el, update-elc.el: Set stack-trace-on-error, load-always-display-messages so we
get better debug results.
update-elc-2.el: Fix typo in name of lisp/mule, leading to compile failure.
simple.el: Omit M-S-home/end from motion keys.
update-elc.el: Overhaul:
-- allow list of "early-compile" files to be specified, not hardcoded
-- fix autoload checking to include all .el files, not just dumped ones
-- be smarter about regenerating autoloads, so we don't need to use
loadup-el if not necessary
-- use standard methods for loading/not loading auto-autoloads.el
(maybe fixes "Already loaded" error?)
-- rename misleading NOBYTECOMPILE flag file.
window-xemacs.el: Fix bug in default param.
window-xemacs.el: Fix compile warnings.
lwlib-Xm.c: Fix compile warning.
lispref/mule.texi: Lots of Mule rewriting.
internals/internals.texi: Major fixup. Correct for new names of Bytebpos, Ichar, etc. and
lots of Mule rewriting.
config.inc.samp: Various fixups.
Makefile.in.in: NOBYTECOMPILE -> BYTECOMPILE_CHANGE.
esd.c: Warning fixes.
fns.c: Eliminate bogus require-prints-loading-message; use already
existent load-always-display-messages instead. Make sure `load'
knows we are coming from `require'.
lread.c: Turn on `load-warn-when-source-newer' by default. Change loading
message to indicate when we are `require'ing. Eliminate
purify_flag hacks to display more messages; instead, loadup and
friends specify this explicitly with
`load-always-display-messages'. Add spaces when batch to clearly
indicate recursive loading. Fassoc() does not GC so no need to
gcpro.
gui-x.c, gui-x.h, menubar-x.c: Fix up crashes when selecting menubar items due to lack of GCPROing
of callbacks in lwlib structures.
eval.c, lisp.h, print.c: Don't canonicalize to selected-frame when noninteractive, or
backtraces get all screwed up as some values are printed through
the stream console and some aren't. Export
canonicalize_printcharfun() and use in Fbacktrace().
author | ben |
---|---|
date | Thu, 06 Feb 2003 06:36:17 +0000 |
parents | c08a6fa181d1 |
children | 1b4bc72f433e |
comparison
equal
deleted
inserted
replaced
1260:278c9cd3435e | 1261:465bd3c7d932 |
---|---|
1 ;;; update-elc-2.el --- Recompile remaining .el files, post-dumping | 1 ;;; update-elc-2.el --- Recompile remaining .el files, post-dumping |
2 | 2 |
3 ;; Copyright (C) 1997 by Free Software Foundation, Inc. | 3 ;; Copyright (C) 1997 by Free Software Foundation, Inc. |
4 ;; Copyright (C) 2000 Ben Wing. | 4 ;; Copyright (C) 2000, 2003 Ben Wing. |
5 | 5 |
6 ;; Author: Ben Wing <ben@xemacs.org>, based on cleantree.el by | 6 ;; Author: Ben Wing <ben@xemacs.org>, based on cleantree.el by |
7 ;; Steven L Baur <steve@xemacs.org> | 7 ;; Steven L Baur <steve@xemacs.org> |
8 ;; Maintainer: XEmacs Development Team | 8 ;; Maintainer: XEmacs Development Team |
9 ;; Keywords: internal | 9 ;; Keywords: internal |
43 ;; | 43 ;; |
44 ;; The original cleantree.el had the comment: This code is derived | 44 ;; The original cleantree.el had the comment: This code is derived |
45 ;; from Gnus based on a suggestion by David Moore <dmoore@ucsd.edu> | 45 ;; from Gnus based on a suggestion by David Moore <dmoore@ucsd.edu> |
46 | 46 |
47 ;;; Code: | 47 ;;; Code: |
48 | |
49 ;; Help debug problems. | |
50 (setq stack-trace-on-error t | |
51 load-always-display-messages t) | |
48 | 52 |
49 (defvar update-elc-ignored-dirs | 53 (defvar update-elc-ignored-dirs |
50 `("." ".." "CVS" "SCCS" "RCS" ,@(unless (featurep 'mule) '("mule")))) | 54 `("." ".." "CVS" "SCCS" "RCS" ,@(unless (featurep 'mule) '("mule")))) |
51 | 55 |
52 (defvar update-elc-ignored-files | 56 (defvar update-elc-ignored-files |
160 (delete (concat (file-name-as-directory moddir) "..") | 164 (delete (concat (file-name-as-directory moddir) "..") |
161 (directory-files moddir t nil nil 0))) | 165 (directory-files moddir t nil nil 0))) |
162 t) | 166 t) |
163 (byte-recompile-file generated-autoload-file 0))) | 167 (byte-recompile-file generated-autoload-file 0))) |
164 (when (featurep 'mule) | 168 (when (featurep 'mule) |
165 (let* ((muledir (expand-file-name "../modules" (file-truename dir))) | 169 (let* ((muledir (expand-file-name "../lisp/mule" (file-truename dir))) |
166 (generated-autoload-file | 170 (generated-autoload-file |
167 (expand-file-name "auto-autoloads.el" muledir)) | 171 (expand-file-name "auto-autoloads.el" muledir)) |
168 (autoload-package-name "mule")) ; feature prefix | 172 (autoload-package-name "mule")) ; feature prefix |
169 (update-autoload-files (list muledir)) | 173 (update-autoload-files (list muledir)) |
170 (byte-recompile-file generated-autoload-file 0))) | 174 (byte-recompile-file generated-autoload-file 0))) |