;;; 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 "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")))