gistfile1.el

;;
;; Use Consolas as my default font
;;
(set-default-font "-*-Consolas-normal-r-*-*-14-97-*-*-c-*-iso8859-1")

(setq transient-mark-mode t)

(load "C:/Tools/emacs/site-lisp/color-theme.el")
(load "C:/Tools/emacs/site-lisp/color-theme-twilight.el")
(load "C:/Tools/emacs/site-lisp/color-theme-inkpot.el")
(load "C:/Tools/emacs/site-lisp/color-theme-hober2.el")

(color-theme-initialize)
;(color-theme-inkpot)
(color-theme-blue-mood)

;;
;; Maximize on startup
;;
(defun w32-maximize-frame ()
  "Maximize the current frame"
  (interactive)
  (w32-send-sys-command 61488))

(add-hook 'window-setup-hook 'w32-maximize-frame t)

;;
;; Other misc. startup stuff
;;
(require 'ffap)
(ffap-bindings)
(setq ffap-require-prefix t)

;;
;; Setup Haskell mode
;;
(load "C:/tools/emacs/site-lisp/haskell-mode/haskell-site-file")
 
(add-hook 'haskell-mode-hook 'turn-on-haskell-doc-mode)
(add-hook 'haskell-mode-hook 'turn-on-haskell-indent)
(add-hook 'haskell-mode-hook 'font-lock-mode)
 
(setq haskell-program-name "c:/ghc/ghc-6.10.1/bin/ghci.exe")

;;
;; Setup F# Mode
;;
(setq load-path (cons "C:/Tools/emacs/site-lisp/fsharp" load-path))
(setq auto-mode-alist
      (cons '("\\.fs[iylx]?$" . fsharp-mode) auto-mode-alist))
(autoload 'fsharp-mode "fsharp" "Major mode for editing F# code." t)
(autoload 'run-fsharp "inf-fsharp" "Run an inferior F# process." t)

(setq inferior-fsharp-program "\"C:\\Program Files\\FSharp-1.9.6.2\\bin\\fsi.exe\"")
(setq fsharp-compiler "\"C:\\Program Files\\FSharp-1.9.6.2\\bin\\fsc.exe\"")

;;
;; Setup C# Mode
;;
;; Import C# mode
(load "C:/tools/emacs/site-lisp/csharp-mode-0.7.0.el")
(setq auto-mode-alist
      (append '(("\\.cs$" . csharp-mode)) auto-mode-alist))