Mercurial > emacs
comparison lisp/loadup.el @ 11040:2ea19d4d0b4b
Use appropriate `fboundp' tests to decide what to load.
author | Karl Heuer <kwzh@gnu.org> |
---|---|
date | Thu, 16 Mar 1995 21:27:25 +0000 |
parents | 9e59d5bdaab8 |
children | 564cd5b7f42f |
comparison
equal
deleted
inserted
replaced
11039:c9e2537da847 | 11040:2ea19d4d0b4b |
---|---|
51 (load "files") | 51 (load "files") |
52 (garbage-collect) | 52 (garbage-collect) |
53 (load "indent") | 53 (load "indent") |
54 (garbage-collect) | 54 (garbage-collect) |
55 (load "window") | 55 (load "window") |
56 (garbage-collect) | |
57 (if (fboundp 'delete-frame) | 56 (if (fboundp 'delete-frame) |
58 (progn | 57 (progn |
59 (load "frame") | 58 (garbage-collect) |
59 (load "frame"))) | |
60 (if (fboundp 'frame-face-alist) | |
61 (progn | |
62 (garbage-collect) | |
63 (load "faces") | |
64 (load "facemenu"))) | |
65 (if (fboundp 'track-mouse) | |
66 (progn | |
67 (garbage-collect) | |
60 (load "mouse") | 68 (load "mouse") |
61 (garbage-collect) | |
62 (load "faces") | |
63 (load "facemenu") | |
64 (garbage-collect) | 69 (garbage-collect) |
65 (load "menu-bar") | 70 (load "menu-bar") |
66 (load "scroll-bar") | 71 (load "scroll-bar") |
67 (load "select"))) | 72 (load "select"))) |
68 (garbage-collect) | 73 (garbage-collect) |