annotate lisp/dumped-lisp.el @ 5307:c096d8051f89

Have NATNUMP give t for positive bignums; check limits appropriately. src/ChangeLog addition: 2010-11-20 Aidan Kehoe <kehoea@parhasard.net> * abbrev.c (Fexpand_abbrev): * alloc.c: * alloc.c (Fmake_list): * alloc.c (Fmake_vector): * alloc.c (Fmake_bit_vector): * alloc.c (Fmake_byte_code): * alloc.c (Fmake_string): * alloc.c (vars_of_alloc): * bytecode.c (UNUSED): * bytecode.c (Fbyte_code): * chartab.c (decode_char_table_range): * cmds.c (Fself_insert_command): * data.c (check_integer_range): * data.c (Fnatnump): * data.c (Fnonnegativep): * data.c (Fstring_to_number): * elhash.c (hash_table_size_validate): * elhash.c (decode_hash_table_size): * eval.c (Fbacktrace_frame): * event-stream.c (lisp_number_to_milliseconds): * event-stream.c (Faccept_process_output): * event-stream.c (Frecent_keys): * event-stream.c (Fdispatch_event): * events.c (Fmake_event): * events.c (Fevent_timestamp): * events.c (Fevent_timestamp_lessp): * events.h: * events.h (struct command_builder): * file-coding.c (gzip_putprop): * fns.c: * fns.c (check_sequence_range): * fns.c (Frandom): * fns.c (Fnthcdr): * fns.c (Flast): * fns.c (Fnbutlast): * fns.c (Fbutlast): * fns.c (Fmember): * fns.c (Ffill): * fns.c (Freduce): * fns.c (replace_string_range_1): * fns.c (Freplace): * font-mgr.c (Ffc_pattern_get): * frame-msw.c (msprinter_set_frame_properties): * glyphs.c (check_valid_xbm_inline): * indent.c (Fmove_to_column): * intl-win32.c (mswindows_multibyte_to_unicode_putprop): * lisp.h: * lisp.h (ARRAY_DIMENSION_LIMIT): * lread.c (decode_mode_1): * mule-ccl.c (ccl_get_compiled_code): * number.h: * process-unix.c (unix_open_multicast_group): * process.c (Fset_process_window_size): * profile.c (Fstart_profiling): * unicode.c (Funicode_to_char): Change NATNUMP to return 1 for positive bignums; changes uses of it and of CHECK_NATNUM appropriately, usually by checking for an integer in an appropriate range. Add array-dimension-limit and use it in #'make-vector, #'make-string. Add array-total-size-limit, array-rank-limit while we're at it, for the sake of any Common Lisp-oriented code that uses these limits. Rename check_int_range to check_integer_range, have it take Lisp_Objects (and thus bignums) instead. Remove bignum_butlast(), just set int_n to an appropriately large integer if N is a bignum. Accept bignums in check_sequence_range(), change the functions that use check_sequence_range() appropriately. Move the definition of NATNUMP() to number.h; document why it's a reasonable name, contradicting an old comment. tests/ChangeLog addition: 2010-11-20 Aidan Kehoe <kehoea@parhasard.net> * automated/lisp-tests.el: * automated/lisp-tests.el (featurep): * automated/lisp-tests.el (wrong-type-argument): * automated/mule-tests.el (featurep): Check for args-out-of-range errors instead of wrong-type-argument errors in various places when code is handed a large bignum instead of a fixnum. Also check for the wrong-type-argument errors when giving the same code a non-integer value.
author Aidan Kehoe <kehoea@parhasard.net>
date Sat, 20 Nov 2010 16:49:11 +0000
parents d27c1ee1943b
children 75469840109b b9167d522a9a
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
1330
4542b72c005e [xemacs-hg @ 2003-03-01 07:25:26 by ben]
ben
parents: 1315
diff changeset
1 (defvar packages-hardcoded-lisp
4542b72c005e [xemacs-hg @ 2003-03-01 07:25:26 by ben]
ben
parents: 1315
diff changeset
2 '(
4542b72c005e [xemacs-hg @ 2003-03-01 07:25:26 by ben]
ben
parents: 1315
diff changeset
3 ;; Nothing at this time
4542b72c005e [xemacs-hg @ 2003-03-01 07:25:26 by ben]
ben
parents: 1315
diff changeset
4 )
4542b72c005e [xemacs-hg @ 2003-03-01 07:25:26 by ben]
ben
parents: 1315
diff changeset
5 "Lisp packages that are always dumped with XEmacs.
4542b72c005e [xemacs-hg @ 2003-03-01 07:25:26 by ben]
ben
parents: 1315
diff changeset
6 This includes every package that is loaded directly by a package listed
4542b72c005e [xemacs-hg @ 2003-03-01 07:25:26 by ben]
ben
parents: 1315
diff changeset
7 in dumped-lisp.el and is not itself listed.")
4542b72c005e [xemacs-hg @ 2003-03-01 07:25:26 by ben]
ben
parents: 1315
diff changeset
8
2367
ecf1ebac70d8 [xemacs-hg @ 2004-11-04 23:05:23 by ben]
ben
parents: 1333
diff changeset
9
ecf1ebac70d8 [xemacs-hg @ 2004-11-04 23:05:23 by ben]
ben
parents: 1333
diff changeset
10 ;; WARNING WARNING WARNING: None of the files below, until where it says
ecf1ebac70d8 [xemacs-hg @ 2004-11-04 23:05:23 by ben]
ben
parents: 1333
diff changeset
11 ;; "All files after this can have extended characters in them", can have
ecf1ebac70d8 [xemacs-hg @ 2004-11-04 23:05:23 by ben]
ben
parents: 1333
diff changeset
12 ;; extended (non-ASCII characters) of any sort in them! Unfortunately, you
ecf1ebac70d8 [xemacs-hg @ 2004-11-04 23:05:23 by ben]
ben
parents: 1333
diff changeset
13 ;; will not get any error at load-time; however, you may get a later very
ecf1ebac70d8 [xemacs-hg @ 2004-11-04 23:05:23 by ben]
ben
parents: 1333
diff changeset
14 ;; cryptic error "Invalid opcode"! This is caused by the byte-code data
ecf1ebac70d8 [xemacs-hg @ 2004-11-04 23:05:23 by ben]
ben
parents: 1333
diff changeset
15 ;; being encoded as escape-quoted, when we can't handle that yet.
ecf1ebac70d8 [xemacs-hg @ 2004-11-04 23:05:23 by ben]
ben
parents: 1333
diff changeset
16 ;;
ecf1ebac70d8 [xemacs-hg @ 2004-11-04 23:05:23 by ben]
ben
parents: 1333
diff changeset
17 ;; #### We should resurrect the check for the coding-system magic cookie in
ecf1ebac70d8 [xemacs-hg @ 2004-11-04 23:05:23 by ben]
ben
parents: 1333
diff changeset
18 ;; fileio.c and put in an abort if we are not able to handle it yet.
ecf1ebac70d8 [xemacs-hg @ 2004-11-04 23:05:23 by ben]
ben
parents: 1333
diff changeset
19
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
20 (setq preloaded-file-list
1315
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
21 (list
1333
1b0339b048ce [xemacs-hg @ 2003-03-02 09:38:37 by ben]
ben
parents: 1330
diff changeset
22 ;; do not defcustom any variables in these files
1b0339b048ce [xemacs-hg @ 2003-03-02 09:38:37 by ben]
ben
parents: 1330
diff changeset
23
1315
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
24 "backquote" ; needed for defsubst etc.
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
25 "bytecomp-runtime" ; define defsubst
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
26 "subr" ; load the most basic Lisp functions
5284
d27c1ee1943b Make the order of preloaded-file-list more sane.
Aidan Kehoe <kehoea@parhasard.net>
parents: 5264
diff changeset
27 "cl"
d27c1ee1943b Make the order of preloaded-file-list more sane.
Aidan Kehoe <kehoea@parhasard.net>
parents: 5264
diff changeset
28 "cl-extra" ; also loads cl-macs if we're running interpreted.
d27c1ee1943b Make the order of preloaded-file-list more sane.
Aidan Kehoe <kehoea@parhasard.net>
parents: 5264
diff changeset
29 "cl-seq"
1315
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
30 "post-gc"
4246
9fec7fedbf1b [xemacs-hg @ 2007-10-31 11:21:02 by aidan]
aidan
parents: 4072
diff changeset
31 "version"
5284
d27c1ee1943b Make the order of preloaded-file-list more sane.
Aidan Kehoe <kehoea@parhasard.net>
parents: 5264
diff changeset
32 "custom" ; Before the world so everything can be customized
d27c1ee1943b Make the order of preloaded-file-list more sane.
Aidan Kehoe <kehoea@parhasard.net>
parents: 5264
diff changeset
33 "cus-start" ; for customization of builtin variables
d27c1ee1943b Make the order of preloaded-file-list more sane.
Aidan Kehoe <kehoea@parhasard.net>
parents: 5264
diff changeset
34 "find-paths"
d27c1ee1943b Make the order of preloaded-file-list more sane.
Aidan Kehoe <kehoea@parhasard.net>
parents: 5264
diff changeset
35 "packages"
d27c1ee1943b Make the order of preloaded-file-list more sane.
Aidan Kehoe <kehoea@parhasard.net>
parents: 5264
diff changeset
36 "setup-paths"
d27c1ee1943b Make the order of preloaded-file-list more sane.
Aidan Kehoe <kehoea@parhasard.net>
parents: 5264
diff changeset
37 "replace"
1315
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
38 "widget"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
39 "cmdloop"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
40 "keymap"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
41 "syntax"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
42 "device"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
43 "console"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
44 "obsolete"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
45 "specifier"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
46 "frame" ; needed by faces
3094
ad2f4ae9895b [xemacs-hg @ 2005-11-26 11:45:47 by stephent]
stephent
parents: 2973
diff changeset
47 ;; #### this should be (featurep 'xft)
3354
15fb91e3a115 [xemacs-hg @ 2006-04-23 16:11:16 by stephent]
stephent
parents: 3094
diff changeset
48 (when (featurep 'xft-fonts) "fontconfig") ; needed by x-faces
1315
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
49 (when (featurep 'x) "x-faces") ; needed by faces
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
50 (when (featurep 'gtk) "gtk-faces")
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
51 (when (valid-console-type-p 'mswindows) "msw-faces")
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
52 "faces" ; must be loaded before any make-face call
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
53 ;;(pureload "facemenu") #### not yet ported
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
54 "glyphs"
5176
8b2f75cecb89 rename objects* (.c, .h and .el files) to fontcolor*
Ben Wing <ben@xemacs.org>
parents: 4506
diff changeset
55 "fontcolor"
1315
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
56 "extents"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
57 "events"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
58 "hash-table"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
59 "text-props"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
60 "process" ;; This is bad. network-streams may not be defined.
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
61 (when (featurep 'multicast) "multicast") ; #+network-streams implicitly true
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
62 "map-ynp"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
63 "undo-stack"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
64 "window" ; simple needs `save-window-excursion'
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
65 "window-xemacs"
3932
c585f0c06591 [xemacs-hg @ 2007-04-30 19:50:53 by stephent]
stephent
parents: 3767
diff changeset
66 "resize-minibuffer" ; simple needs `resize-minibuffer-mode'
1315
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
67 "simple"
1333
1b0339b048ce [xemacs-hg @ 2003-03-02 09:38:37 by ben]
ben
parents: 1330
diff changeset
68 "newcomment"
1315
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
69 "keydefs" ; Before loaddefs so that keymap vars exist.
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
70 "abbrev"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
71 "derived"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
72 "minibuf"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
73 "list-mode"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
74 "modeline" ; needs simple.el to be loaded first
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
75 ;; If SparcWorks support is included some additional packages are
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
76 ;; dumped which would normally have autoloads. To avoid
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
77 ;; duplicate doc string warnings, SparcWorks uses a separate
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
78 ;; autoloads file with the dumped packages removed.
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
79 ;; After fixing, eos/loaddefs-eos and loaddefs appear identical?!!
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
80 ;; So just make loaddefs-eos go away...
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
81 ;;(pureload (if (featurep 'sparcworks) "eos/loaddefs-eos" "loaddefs"))
1315
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
82 "cus-file"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
83 "startup" ; For initialization of
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
84 ; `emacs-user-extension-dir'
1315
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
85 "misc"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
86 ;; (pureload "profile")
3368
959746c534f6 [xemacs-hg @ 2006-04-29 16:15:21 by aidan]
aidan
parents: 3354
diff changeset
87 "loadhist" ; Must be dumped before loaddefs is loaded
959746c534f6 [xemacs-hg @ 2006-04-29 16:15:21 by aidan]
aidan
parents: 3354
diff changeset
88 ; Used by help.
1315
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
89 ;; (pureload "hyper-apropos") Soon...
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
90 "files"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
91 "lib-complete"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
92 "format"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
93 "indent"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
94 "isearch-mode"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
95 "buffer"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
96 "buff-menu"
4372
ebb35ddea76a Byte-compile menu lambdas; make the menu of available tutorials more readable.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4246
diff changeset
97 "paths"
1315
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
98 "lisp"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
99 "page"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
100 "register"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
101 "iso8859-1" ; This must be before any modes
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
102 ; (sets standard syntax table.)
4506
bd28481bb0e1 Port #'window-buffer-height, #'fit-window-to-buffer, & window, buf, functions.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4372
diff changeset
103 "easy-mmode" ; Added for 21.5. Used by help.
bd28481bb0e1 Port #'window-buffer-height, #'fit-window-to-buffer, & window, buf, functions.
Aidan Kehoe <kehoea@parhasard.net>
parents: 4372
diff changeset
104 "help"
1315
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
105 "easymenu" ; Added for 20.3.
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
106 "lisp-mode"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
107 "text-mode"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
108 "fill"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
109 "auto-save" ; Added for 20.4
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
110 "movemail" ; Added for 21.2
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
111 (when (eq system-type 'windows-nt) "win32-native")
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
112 (when (featurep 'lisp-float-type) "float-sup")
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
113 "itimer" ; for vars auto-save-timeout and
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
114 ; auto-gc-threshold
1315
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
115 "itimer-autosave"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
116 "printer"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
117 "behavior"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
118 "behavior-defs"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
119 "diagnose"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
120
442
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
121 ;;;;;;;;;;;;;;;;;; GUI support
1315
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
122 (when (featurep 'window-system)
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
123 '("gui"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
124 "mouse"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
125 "mode-motion"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
126 ))
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
127 (when (featurep 'toolbar) "toolbar")
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
128 (when (featurep 'scrollbar) "scrollbar")
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
129 (when (featurep 'menubar) "menubar")
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
130 (when (featurep 'dialog) "dialog")
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
131 (when (featurep 'gutter) "gutter")
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
132 (when (featurep 'dragdrop-api) "dragdrop")
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
133 "select"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
134
442
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
135 ;;;;;;;;;;;;;;;;;; Content for GUI's
1315
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
136 ;; There used to be window-system inserted in the when-feature,
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
137 ;; but IMHO your configure script should turn off the menubar,
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
138 ;; toolbar, etc. features when there is no window system. We
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
139 ;; should just be able to assume that, if (featurep 'menubar),
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
140 ;; the menubar should work and if items are added, they can be
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
141 ;; seen clearly and usefully.
5228
5efbd1253905 Remove all support for InfoDock.
Aidan Kehoe <kehoea@parhasard.net>
parents: 5178
diff changeset
142 (when (featurep 'menubar) "menubar-items")
5efbd1253905 Remove all support for InfoDock.
Aidan Kehoe <kehoea@parhasard.net>
parents: 5178
diff changeset
143 (when (featurep 'gutter) "gutter-items")
5efbd1253905 Remove all support for InfoDock.
Aidan Kehoe <kehoea@parhasard.net>
parents: 5178
diff changeset
144 (when (featurep 'toolbar) "toolbar-items")
5efbd1253905 Remove all support for InfoDock.
Aidan Kehoe <kehoea@parhasard.net>
parents: 5178
diff changeset
145 (when (featurep 'dialog) "dialog-items")
442
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
146
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
147 ;;;;;;;;;;;;;;;;;; Coding-system support
1315
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
148 "coding"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
149 "code-files"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
150 ;; Handle process with encoding/decoding coding-system.
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
151 "code-process"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
152 ;; Provide basic commands to set coding systems to user
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
153 "code-cmds"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
154 "unicode"
442
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
155 ;;;;;;;;;;;;;;;;;; MULE support
1315
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
156 (when (featurep 'mule)
2465
afab4c317508 [xemacs-hg @ 2005-01-03 10:29:11 by michaels]
michaels
parents: 2367
diff changeset
157 '("mule/mule-charset"
afab4c317508 [xemacs-hg @ 2005-01-03 10:29:11 by michaels]
michaels
parents: 2367
diff changeset
158 "mule/mule-cmds" ; to sync with Emacs 20.1
afab4c317508 [xemacs-hg @ 2005-01-03 10:29:11 by michaels]
michaels
parents: 2367
diff changeset
159 "mule/mule-coding"
afab4c317508 [xemacs-hg @ 2005-01-03 10:29:11 by michaels]
michaels
parents: 2367
diff changeset
160 "mule/mule-composite-stub"
afab4c317508 [xemacs-hg @ 2005-01-03 10:29:11 by michaels]
michaels
parents: 2367
diff changeset
161 "mule/mule-composite"
1315
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
162 ))
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
163 ;; may initialize coding systems
2465
afab4c317508 [xemacs-hg @ 2005-01-03 10:29:11 by michaels]
michaels
parents: 2367
diff changeset
164 (when (featurep '(and mule x)) "mule/mule-x-init")
afab4c317508 [xemacs-hg @ 2005-01-03 10:29:11 by michaels]
michaels
parents: 2367
diff changeset
165 (when (featurep '(and mule tty)) "mule/mule-tty-init")
1315
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
166 (when (and (featurep 'mule) (memq system-type '(windows-nt cygwin32)))
2474
a43cb0f95540 [xemacs-hg @ 2005-01-09 14:22:08 by adrian]
adrian
parents: 2465
diff changeset
167 "mule/mule-win32-init")
1315
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
168 "code-init" ; set up defaults
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
169 ;; All files after this can have extended characters in them.
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
170 (when (featurep 'mule)
2465
afab4c317508 [xemacs-hg @ 2005-01-03 10:29:11 by michaels]
michaels
parents: 2367
diff changeset
171 '("mule/mule-category"
afab4c317508 [xemacs-hg @ 2005-01-03 10:29:11 by michaels]
michaels
parents: 2367
diff changeset
172 "mule/kinsoku"
1315
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
173 ))
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
174
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
175 ;; after this goes the specific lisp routines for a particular input system
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
176 ;; 97.2.5 JHod Shouldn't these go into a site-load file to allow site
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
177 ;; or user switching of input systems???
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
178 ;(if (featurep 'wnn)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
179 ; (progn
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
180 ; (pureload "egg")
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
181 ; (pureload "egg-wnn")
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
182 ; (setq egg-default-startup-file "eggrc-wnn")))
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
183
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
184 ;; (if (and (boundp 'CANNA) CANNA)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
185 ;; (pureload "canna")
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
186 ;; )
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
187
780
578cb2932d72 [xemacs-hg @ 2002-03-18 10:07:30 by ben]
ben
parents: 778
diff changeset
188 ;; Now load files to set up all the different languages/environments that
578cb2932d72 [xemacs-hg @ 2002-03-18 10:07:30 by ben]
ben
parents: 778
diff changeset
189 ;; Mule knows about. Formerly we had to worry about files shadowed by
578cb2932d72 [xemacs-hg @ 2002-03-18 10:07:30 by ben]
ben
parents: 778
diff changeset
190 ;; those of the same name in leim/quail.el, but no longer, since we now
578cb2932d72 [xemacs-hg @ 2002-03-18 10:07:30 by ben]
ben
parents: 778
diff changeset
191 ;; compile with -no-packages.
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
192
1315
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
193 (when (featurep 'mule)
2465
afab4c317508 [xemacs-hg @ 2005-01-03 10:29:11 by michaels]
michaels
parents: 2367
diff changeset
194 '("mule/arabic"
afab4c317508 [xemacs-hg @ 2005-01-03 10:29:11 by michaels]
michaels
parents: 2367
diff changeset
195 "mule/chinese"
afab4c317508 [xemacs-hg @ 2005-01-03 10:29:11 by michaels]
michaels
parents: 2367
diff changeset
196 "mule/cyrillic"
afab4c317508 [xemacs-hg @ 2005-01-03 10:29:11 by michaels]
michaels
parents: 2367
diff changeset
197 "mule/english"
afab4c317508 [xemacs-hg @ 2005-01-03 10:29:11 by michaels]
michaels
parents: 2367
diff changeset
198 "mule/ethiopic"
afab4c317508 [xemacs-hg @ 2005-01-03 10:29:11 by michaels]
michaels
parents: 2367
diff changeset
199 "mule/greek"
afab4c317508 [xemacs-hg @ 2005-01-03 10:29:11 by michaels]
michaels
parents: 2367
diff changeset
200 "mule/hebrew"
afab4c317508 [xemacs-hg @ 2005-01-03 10:29:11 by michaels]
michaels
parents: 2367
diff changeset
201 "mule/indian"
afab4c317508 [xemacs-hg @ 2005-01-03 10:29:11 by michaels]
michaels
parents: 2367
diff changeset
202 "mule/devanagari" ; must be loaded after indian.el
afab4c317508 [xemacs-hg @ 2005-01-03 10:29:11 by michaels]
michaels
parents: 2367
diff changeset
203 "mule/japanese"
afab4c317508 [xemacs-hg @ 2005-01-03 10:29:11 by michaels]
michaels
parents: 2367
diff changeset
204 "mule/korean"
4072
aa28d959af41 [xemacs-hg @ 2007-07-22 22:03:29 by aidan]
aidan
parents: 3932
diff changeset
205 "mule/lao" ; sucks.
2465
afab4c317508 [xemacs-hg @ 2005-01-03 10:29:11 by michaels]
michaels
parents: 2367
diff changeset
206 "mule/latin"
afab4c317508 [xemacs-hg @ 2005-01-03 10:29:11 by michaels]
michaels
parents: 2367
diff changeset
207 "mule/misc-lang"
1315
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
208 ;; "thai" #### merge thai and thai-xtis!!!
4072
aa28d959af41 [xemacs-hg @ 2007-07-22 22:03:29 by aidan]
aidan
parents: 3932
diff changeset
209 ;; #### Even better; take out thai-xtis! It's not even a
aa28d959af41 [xemacs-hg @ 2007-07-22 22:03:29 by aidan]
aidan
parents: 3932
diff changeset
210 ;; standard, and no-one uses it.
2465
afab4c317508 [xemacs-hg @ 2005-01-03 10:29:11 by michaels]
michaels
parents: 2367
diff changeset
211 "mule/thai-xtis"
afab4c317508 [xemacs-hg @ 2005-01-03 10:29:11 by michaels]
michaels
parents: 2367
diff changeset
212 "mule/tibetan"
afab4c317508 [xemacs-hg @ 2005-01-03 10:29:11 by michaels]
michaels
parents: 2367
diff changeset
213 "mule/vietnamese"
1315
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
214 ))
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
215
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
216 ;; Specialized language support
2973
414a64af46c9 [xemacs-hg @ 2005-10-04 17:51:13 by stephent]
stephent
parents: 2828
diff changeset
217 (when (featurep 'mule) "mule/canna-leim")
780
578cb2932d72 [xemacs-hg @ 2002-03-18 10:07:30 by ben]
ben
parents: 778
diff changeset
218 ;; needs access to the charsets created by the above
578cb2932d72 [xemacs-hg @ 2002-03-18 10:07:30 by ben]
ben
parents: 778
diff changeset
219 ;; language-specific files.
1315
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
220 (when (and (featurep 'mule) (valid-console-type-p 'mswindows))
2465
afab4c317508 [xemacs-hg @ 2005-01-03 10:29:11 by michaels]
michaels
parents: 2367
diff changeset
221 "mule/mule-msw-init-late")
780
578cb2932d72 [xemacs-hg @ 2002-03-18 10:07:30 by ben]
ben
parents: 778
diff changeset
222
3707
f6f6fc9eb269 [xemacs-hg @ 2006-11-28 21:20:22 by aidan]
aidan
parents: 3368
diff changeset
223 (when (featurep 'mule)
f6f6fc9eb269 [xemacs-hg @ 2006-11-28 21:20:22 by aidan]
aidan
parents: 3368
diff changeset
224 "mule/general-late")
f6f6fc9eb269 [xemacs-hg @ 2006-11-28 21:20:22 by aidan]
aidan
parents: 3368
diff changeset
225
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
226 ;;; mule-load.el ends here
442
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
227
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
228 ;; preload the X code.
1315
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
229 (when (featurep '(and x scrollbar)) "x-scrollbar")
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
230 (when (featurep 'x)
2828
a25c824ed558 [xemacs-hg @ 2005-06-26 18:04:49 by aidan]
aidan
parents: 2579
diff changeset
231 '("x-mouse"
1315
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
232 "x-select"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
233 "x-misc"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
234 "x-init"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
235 "x-win-xfree86"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
236 "x-win-sun"))
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
237 ;; preload the GTK code
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
238 (when (featurep 'gtk)
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
239 '("gtk-ffi"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
240 "gtk-widgets"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
241 "gdk"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
242 "gtk-init"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
243 "gtk-select"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
244 "gtk-mouse"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
245 "gtk-glyphs"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
246 "widgets-gtk"))
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
247 (when (featurep '(and gtk dialog)) "dialog-gtk")
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
248 (when (featurep 'glade) "glade")
462
0784d089fdc9 Import from CVS: tag r21-2-46
cvs
parents: 444
diff changeset
249
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
250 ;; preload the mswindows code.
1315
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
251 (when (valid-console-type-p 'mswindows)
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
252 '("msw-glyphs"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
253 "msw-mouse"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
254 "msw-init"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
255 "msw-select"))
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
256 ;; preload the TTY init code.
1315
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
257 (when (featurep 'tty) "tty-init")
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
258 ;;; Formerly in tooltalk/tooltalk-load.el
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
259 ;; Moved to tooltalk package
1315
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
260 ;; (when (featurep 'tooltalk)
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
261 ;; '("tooltalk-macros" "tooltalk-util" "tooltalk-init"))
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
262 ;; "vc-hooks" ; Packaged. Available in two versions.
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
263 ;; "ediff-hook" ; Packaged.
1315
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
264 "fontl-hooks"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
265 "auto-show"
2579
1fc205405d85 [xemacs-hg @ 2005-02-10 03:26:14 by ben]
ben
parents: 2558
diff changeset
266 "paragraphs" ; needs easy-mmode, coding
1315
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
267 (when (featurep 'ldap) "ldap")
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
268
1315
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
269 ;; (when (featurep 'energize) "energize/energize-load.el")
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
270 ;;; formerly in sunpro/sunpro-load.el
1315
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
271 ;; (when (featurep '(and mule sparcworks)) "mime-setup")
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
272
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
273 ;; Moved to Sun package
1315
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
274 ;; (when (featurep 'sparcworks)
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
275 ;; '("cc-mode" ; Requires cc-mode package
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
276 ;; "sunpro-init"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
277 ;; "ring"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
278 ;; "comint" ; Requires comint package
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
279 ;; "annotations"))
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
280
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
281 ;;; formerly in eos/sun-eos-load.el
1315
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
282 ;; (when (featurep 'sparcworks)
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
283 ;; '("sun-eos-init"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
284 ;; "sun-eos-common"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
285 ;; "sun-eos-editor"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
286 ;; "sun-eos-browser"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
287 ;; "sun-eos-debugger"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
288 ;; "sun-eos-debugger-extra"
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
289 ;; "sun-eos-menubar"))
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
290 "loaddefs" ; <=== autoloads get loaded here
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
291 ))
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
292
70921960b980 [xemacs-hg @ 2003-02-20 08:19:28 by ben]
ben
parents: 1133
diff changeset
293 (setq preloaded-file-list
5264
0d43872986b6 Change (apply 'nconc (mapcar ...)) to (mapcan ...); warn about first form.
Aidan Kehoe <kehoea@parhasard.net>
parents: 5228
diff changeset
294 (mapcan #'(lambda (x) (if (listp x) x (list x))) preloaded-file-list))