(setq c-indent-level 0)
(setq c-brace-imaginary-offset 3)
(setq c-label-offset 3)
(setq c-continued-statement-offset 3)

(require 'tex-site)

(add-hook 'font-lock-mode-hook 'turn-on-lazy-lock)
(global-font-lock-mode)
(setq font-lock-auto-fontify t)
(setq font-lock-maximum-decoration t)



(standard-display-european t)
(set-input-mode nil nil 1)

;(global-set-key (quote [C-x C-e]) (compile))
(global-set-key (quote [C-home]) (quote beginning-of-buffer))
(global-set-key (quote [C-end]) (quote end-of-buffer))
(global-set-key (quote [home]) (quote beginning-of-line))
(global-set-key (quote [end]) (quote end-of-line))
(global-set-key [delete] 'delete-char)
(global-set-key [?\C-x ?\C-e] 'compile)

(require 'pc-select)
(pc-selection-mode)
(transient-mark-mode 1)
(pc-bindings-mode)

(setq text-mode-hook 'turn-on-auto-fill)
(setq fill-column 78)


(defun change-couleurs-frame (frame) 
  (modify-frame-parameters frame
			   (list (cons 'background-color "AntiqueWhite")
                                 (cons 'foreground-color "slateblue")
                                 (cons 'cursor-color "brown")
                                 (cons 'mouse-color "orangered")))
  (frame-update-face-colors frame)

)

(setq after-make-frame-functions '(change-couleurs-frame))
(change-couleurs-frame (selected-frame))

;(set-background-color "AntiqueWhite")
;(set-foreground-color "slateblue")
;(set-cursor-color "brown")
;(set-mouse-color "orangered")

(set-face-background 'modeline "maroon")
(turn-on-font-lock)
(set-face-foreground 'font-lock-keyword-face "magenta")
(set-face-foreground 'font-lock-comment-face "forestgreen")
(set-face-foreground 'font-lock-string-face "firebrick")
(set-face-foreground 'font-lock-variable-name-face "orangered")
;(set-face-foreground 'font-lock-reference-face "DarkSlateGray")
(set-face-foreground 'font-lock-type-face "VioletRed")


;mode Jazz, répertoire à adapter...
;(setq load-path (cons "/usr/local/jazz/emacs" load-path)) 
;(autoload 'jazz-mode "jazz-mode" "" t) 
;(setq auto-mode-alist (cons '("\\.jzz$" . jazz-mode) auto-mode-alist))

																						


;; 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 "~/.xemacs-options")))
;; ============================
;; End of Options Menu Settings
(custom-set-variables
 '(show-paren-style (quote expression))
 '(show-paren-mode t nil (paren))
 '(indent-tabs-mode nil))
(custom-set-faces)