-;;; loadup.el --- load up standardly loaded Lisp files for Emacs.
+;;; loadup.el --- load up standardly loaded Lisp files for Emacs
-;; Copyright (C) 1985, 1986, 1992, 1994 Free Software Foundation, Inc.
+;; Copyright (C) 1985, 1986, 1992, 1994, 2001 Free Software Foundation, Inc.
;; Maintainer: FSF
;; Keywords: internal
(let ((path (car load-path)))
(setq load-path (list path
(expand-file-name "emacs-lisp" path)
+ (expand-file-name "language" path)
(expand-file-name "international" path)))))
(message "Using load-path %s" load-path)
(load "simple")
(load "files")
+(load "faces") ; after here, `defface' may be used.
+
(message "Lists of integers (garbage collection statistics) are normal output")
(message "while building Emacs; they do not indicate a problem.")
(message "%s" (garbage-collect))
(message "%s" (garbage-collect))
(load "help")
+
;; Any Emacs Lisp source file (*.el) loaded here after can contain
;; multilingual text.
(load "international/mule-cmds")
(load "case-table")
(load "international/characters")
-(load "international/ccl")
(load "international/utf-8")
(let ((set-case-syntax-set-multibyte t))
(load "language/tibetan")
(load "language/vietnamese")
(load "language/misc-lang")
+(load "language/utf-8-lang")
+(load "language/georgian")
(update-coding-systems-internal)
(load "indent")
(load "window")
(load "frame")
(load "term/tty-colors")
-(load "faces")
+
(if (fboundp 'frame-face-alist)
(progn
(load "facemenu")))
(load "dos-w32")
(load "dos-fns")
(load "dos-vars")
- (load "international/ccl") ; for cpNNN coding systems in codepage.el
+ (load "international/ccl") ; codepage.el uses CCL en/decoder
(load "international/codepage") ; internal.el uses cpNNN coding systems
(load "disp-table"))) ; needed to setup ibm-pc char set, see internal.el
(if (eq system-type 'macos)