equal
deleted
inserted
replaced
77 (my-modelist-to-hooklist my-text-mode-list) |
77 (my-modelist-to-hooklist my-text-mode-list) |
78 "List of text mode hooks.") |
78 "List of text mode hooks.") |
79 |
79 |
80 ;;; ---------------------------------------------------------------- |
80 ;;; ---------------------------------------------------------------- |
81 (message "appearance") |
81 (message "appearance") |
82 |
|
83 (setq default-directory "~/") |
|
84 |
82 |
85 ;; To maximize frame on full screen, not work with Windows Emacs 21.4. |
83 ;; To maximize frame on full screen, not work with Windows Emacs 21.4. |
86 ;; And maked different height with Emacs 22.3 and 23.1. |
84 ;; And maked different height with Emacs 22.3 and 23.1. |
87 ;; (setq initial-frame-alist '((fullscreen . fullboth))) |
85 ;; (setq initial-frame-alist '((fullscreen . fullboth))) |
88 |
86 |
1440 (let ( (mgs-list '("Welcome to emacs, the thermonuclear editor." |
1438 (let ( (mgs-list '("Welcome to emacs, the thermonuclear editor." |
1441 "You enter to Out Space. Emacs on." |
1439 "You enter to Out Space. Emacs on." |
1442 "Nice day for Emacsing!")) ) |
1440 "Nice day for Emacsing!")) ) |
1443 (message (nth (random (length mgs-list)) mgs-list))))) |
1441 (message (nth (random (length mgs-list)) mgs-list))))) |
1444 |
1442 |
|
1443 (switch-to-buffer "*scratch*") |
|
1444 (setq default-directory "~/") |
|
1445 |
1445 ;;; End loading... |
1446 ;;; End loading... |