(cond (window-system (setq font-lock-maximum-decoration t) )) (add-hook 'tex-mode-hook '(lambda () (turn-on-font-lock) ) ) ;;Font lock (global-font-lock-mode t) (add-hook 'font-lock-mode-hook (function (lambda () (set-face-foreground 'font-lock-comment-face "firebrick") ; (make-face-italic 'font-lock-comment-face) ))) ;;IDL mode (~gregus/lib/emacs/lisp/idl.el) (setq auto-mode-alist (append '(("\\.pro$" . idl-mode)) auto-mode-alist)) (autoload 'idl-mode "idl.el" "Major mode for editing IDL/WAVE CL .pro files" t) (add-hook 'idl-mode-hook (function (lambda () (font-lock-mode 1)))) (autoload 'reftex-mode "reftex" "RefTeX Minor Mode" t) (autoload 'turn-on-reftex "reftex" "RefTeX Minor Mode" nil) (add-hook 'LaTeX-mode-hook 'turn-on-reftex) (setq user-mail-address "matzner@cita.utoronto.ca") (setq default-major-mode 'latex-mode) (setq default-major-mode 'reftex-mode) (add-hook 'text-mode-hook '(lambda () (auto-fill-mode 1)))