Anonymous

;; Load the user's emacs.d dir
(add-to-list 'load-path "~/.emacs.d")

;; Disable the Startup message
(setq inhibit-startup-message t)

;; Disable the toolbar
(tool-bar-mode -1)

;; Disable the Menu
(menu-bar-mode -1)

;; If windowed, use this font
(if window-system
  (set-frame-font "Monospace-12")
  nil)

;; Require color theme and select the 'alexandres' theme
(require 'color-theme)
(color-theme-initialize)
(load-theme 'alexandres)
(if window-system
  (my-color-theme-dark)
  nil)

(defun select-next-frame ()
  "Switch to the next frame"
     (interactive)
     (select-window (next-window)))

(defun select-previous-frame ()
  "Switch to the next frame"
     (interactive)
     (select-window (previous-window)))

;; M-right switches frame
(define-key global-map (if window-system 
                           [(meta right)] "?O1;3C")
  'select-next-frame)
;; M-left switches frame backwards
(define-key global-map (if window-system 
                           [(meta left)] "?O1;3D")
  'select-previous-frame)

;; Syntax highlighting rocks.
(global-font-lock-mode 1)

;; Disable Hard Tabs
(setq-default indent-tabs-mode nil)