;; Red Hat Linux default .emacs initialization file  ; -*- mode: emacs-lisp -*-

;; Set up the keyboard so the delete key on both the regular keyboard
;; and the keypad delete the character under the cursor and to the right
;; under X, instead of the default, backspace behavior.
(global-set-key [delete] 'delete-char)
(global-set-key [kp-delete] 'delete-char)

;; turn on font-lock mode
(global-font-lock-mode t)
;; enable visual feedback on selections
(setq-default transient-mark-mode t)

;; always end a file with a newline
(setq require-final-newline t)

;; stop at the end of the file, not just add lines
(setq next-line-add-newlines nil)

(when window-system
  ;; enable wheelmouse support by default
  (mwheel-install)
  ;; use extended compound-text coding for X clipboard
  (set-selection-coding-system 'compound-text-with-extensions))

;; copy from maths inst

(setq tex-dvi-view-command "xdvi")
(setq calendar-latitude [51 46 north])
(setq calendar-longitude [1 15 west])
(setq european-calendar-style "t")
(display-time)


(require 'tex-site)
(if (eq window-system 'x)
(require 'font-latex))

;; now some stuff for font-locking
(cond ((null window-system))
 ((fboundp 'global-font-lock-mode)
  (setq font-lock-maximum-decoration t)
  (global-font-lock-mode t)  
  (if (load "lazy-lock" t)
  (add-hook 'font-lock-mode-hook 'turn-on-lazy-lock))))

(custom-set-variables
  ;; custom-set-variables was added by Custom -- don't edit or cut/paste it!
  ;; Your init file should contain only one such instance.
 '(case-fold-search t)
 '(current-language-environment "English")
 '(text-mode-hook (quote (turn-on-auto-fill text-mode-hook-identify))))
(custom-set-faces
  ;; custom-set-faces was added by Custom -- don't edit or cut/paste it!
  ;; Your init file should contain only one such instance.
 )