;; (load "C:/elisp/ess-5.3.1/lisp/ess-site") junk from haley's file.



(defun good-colors ()
  (progn
	 (set-background-color "DimGray")
	 (set-foreground-color "LightGray")
	 (set-cursor-color "DarkSlateBlue")
	 (set-border-color "DimGray")
	 (set-mouse-color "DarkSlateBlue")
	 
	 (set-face-background 'default "DimGray")
	 (set-face-background 'region "DarkSlateGray")
	 (set-face-background 'highlight "DarkSlateBlue")
	 (set-face-background 'modeline "DarkSlateBlue") ;;; CornflowerBlue")
	 
	 (set-face-foreground 'default "LightGray")
	 (set-face-foreground 'region "Ivory")
	 (set-face-foreground 'highlight "LightGray")  ;;; DimGray")
	 (set-face-foreground 'modeline "LightGray")
	 ))

(good-colors)

(require 'ess-site) 
(setq ess-indent-level 8) 

(custom-set-variables
  '(column-number-mode t)
  '(c-basic-offset 4)
  '(c-default-style "bsd")
)

(transient-mark-mode t)


(add-hook 'ess-mode-hook
           (lambda ()
    (ess-set-style 'BSD)
    (setq tab-width 8)
    (setq indent-tabs-mode t)
    (add-hook 'local-write-file-hooks
      (lambda ()
(delete-trailing-whitespace)))))