|
|
6173cdc |
;;; default.el - loaded at startup after "~/.xemacs/init.el" by default
|
|
|
6173cdc |
;;;
|
|
|
a811c10 |
;;; Setting `inhibit-default-init' to non-nil in "~/.xemacs/init.el"
|
|
|
6173cdc |
;;; prevents loading of this file. The "-q" option to xemacs
|
|
|
6173cdc |
;;; prevents "~/.xemacs/init.el" *and* this file from being loaded
|
|
|
6173cdc |
;;; at startup.
|
|
|
6173cdc |
|
|
|
a811c10 |
;; enable wheel mouse support by default
|
|
|
6173cdc |
(when window-system
|
|
|
6173cdc |
(mwheel-install))
|
|
|
6173cdc |
|
|
|
6173cdc |
;; make gnus save articles be mbox format not rmail format
|
|
|
6173cdc |
(defvar gnus-default-article-saver 'gnus-summary-save-in-file)
|
|
|
6173cdc |
|
|
|
6173cdc |
;; use terminfo by default
|
|
|
6173cdc |
(defvar system-uses-terminfo t)
|
|
|
a811c10 |
|
|
|
0413074 |
;; turn on syntax highlighting by default if lazy-lock is available
|
|
|
a811c10 |
(when (fboundp 'turn-on-lazy-lock)
|
|
|
0413074 |
(require 'font-lock)
|
|
|
a811c10 |
;; use lazy-lock by default if lazy-shot is not enabled
|
|
|
a811c10 |
(remove-hook 'font-lock-mode-hook 'turn-on-lazy-lock)
|
|
|
a811c10 |
(add-hook 'font-lock-mode-hook
|
|
|
a811c10 |
(function
|
|
|
a811c10 |
(lambda ()
|
|
|
a811c10 |
(unless (and (boundp 'lazy-shot-mode) lazy-shot-mode)
|
|
|
a811c10 |
(turn-on-lazy-lock))))
|
|
|
a811c10 |
t))
|