; Remove bloat.
(tool-bar-mode nil)
(menu-bar-mode nil)
(scroll-bar-mode nil)

; Set up Clojure.
(require 'clojure-mode)
(setq auto-mode-alist (append (list '("\\.clj\\'" . clojure-mode))
                  auto-mode-alist))
(setq inferior-lisp-program "java -jar
C:/Users/PinkPrincess/Clojure/clojure.jar")

; Make Emacs all shiny and pink.
(set-face-background 'region "DeepPink")
(setq default-frame-alist
      '((cursor-color . "DeepPink")
    (foreground-color . "HotPink")
    (background-color . "Black")))

; Make the audible bell shut the shit up.
(setq visible-bell t)

; Don't back stuff up.
(setq make-backup-files nil)
(setq auto-save-list-file-name nil)
(setq auto-save-default nil)

; Set some highlighting.
(setq search-highlight t)
(setq query-replace-highlight t)

; Show column numbers and wrap at 80 chars. No one can possibly need more!
(column-number-mode t)
(setq-default fill-column 80)
(setq-default auto-fill-function 'do-auto-fill)