xemacs

I have gotten used to xemacs at work, mostly for latex and IDL, so I wanted to have it here too. Emacs just didn't seem right. I pretty much just followed the installation instructions. I have included my .emacs file, which was inherited from the guy who got me into Linux. My .cshrc, which I inherited form the same guy also has some xemacs customization. ==========================================================================

.emacs

;; (setq default-major-mode 'text-mode)
(setq-default tab-width 2)
(setq c-indent-level 2)
(setq c-continued-statement-offest 2)
(setq c-argdecl-indent 0)
(setq c-brace-offset -1)
(setq c-label-offset -1)
(setq auto-mode-alist
  (append
    '(("\\.C$"  . c++-mode)
      ("\\.H$"  . c++-mode)
      ("\\.cc&" . c++-mode)
      ("\\.hh&" . c++-mode)
      ("\\.c&"  . c-mode)
      ("\\.h&"  . c-mode)
      ("\\.m&"  . objc-mode)
      ("\\.doc&" . text-mode)
      ("\\.txt&" . text-mode)
                        ("\\.pro\\'" . idlwave-mode)
     ) auto-mode-alist))
(autoload 'idlwave-mode "idlwave" "IDLWAVE Mode" t)
(autoload 'idlwave-shell "idlw-shell" "IDLWAVE Shell" t)
     (autoload 'ispell-word "ispell" "Check the spelling of word in buffer.
" t)
     (autoload 'ispell-region "ispell" "Check the spelling of region." t)
     (autoload 'ispell-buffer "ispell" "Check the spelling of buffer." t)
     (global-set-key "\e$" 'ispell-word)

(setq text-mode-hook 'turn-on-auto-fill)
(add-hook 'text-mode-hook '(lambda () (setq tab-width 5)))
(add-hook 'text-mode-hook '(lambda () (setq tab-stop-list '(5 10 15 20 25 30 35))))

;; Options Menu Settings
;; =====================
(cond
 ((and (string-match "XEmacs" emacs-version)
       (boundp 'emacs-major-version)
       (or (and
            (= emacs-major-version 19)
            (>= emacs-minor-version 14))
           (= emacs-major-version 20))
       (fboundp 'load-options-file))
  (load-options-file "/home/dan/.xemacs-options")))
;; ============================
;; End of Options Menu Settings
(custom-set-variables
 '(paren-mode (quote paren) nil (paren))
 '(font-lock-maximum-decoration t)
 '(load-home-init-file t t)
 '(user-mail-address "a@b.c")
 '(query-user-mail-address nil)
 '(font-lock-mode t nil (font-lock)))
(custom-set-faces
 '(default ((t (:foreground "cyan" :background "black" :family "fixed"))) t)
 '(secondary-selection ((t (:background "blue"))) t)
 '(widget-field-face ((t (:background "slategray"))))
 '(modeline-buffer-id ((t (:foreground "cyan"))) t)
 '(font-lock-preprocessor-face ((t (:foreground "skyblue"))))
 '(modeline-mousable ((t (:foreground "red"))) t)
 '(font-lock-variable-name-face ((t (:foreground "cyan"))))
 '(paren-match ((t (:foreground "green" :background "darkgreen"))) t)
 '(font-lock-type-face ((t (:foreground "purple"))))
 '(primary-selection ((t (:background "slategray"))) t)
 '(font-lock-comment-face ((t (:foreground "slategray"))))
 '(font-lock-function-name-face ((t (:foreground "skyblue"))))
 '(isearch ((t (:background "slategray"))) t)
 '(highlight ((t (:background "darkgreen"))) t)
 '(zmacs-region ((t (:background "slategray"))) t))

====================================================================================