my current .emacs file

.emacs

;(require 'color-theme)
;;; Emacs Load Path
;(setq load-path (push "~/.emacs.d/" load-path))

(setq browse-url-generic-program (executable-find "google-chrome")
      browse-url-browser-function 'browse-url-generic)

;; Convert TAB to SPACE.
(setq-default indent-tabs-mode nil)

;;;;;;;;;;;;;;;;;;;;
;; set up unicode
(prefer-coding-system       'utf-8)
(set-default-coding-systems 'utf-8)
(set-terminal-coding-system 'utf-8)
(set-keyboard-coding-system 'utf-8)
;; This from a japanese individual.  I hope it works.
(setq default-buffer-file-coding-system 'utf-8)
;; From Emacs wiki
(setq x-select-request-type '(UTF8_STRING COMPOUND_TEXT TEXT STRING))

(custom-set-variables '(slime-net-coding-system (quote utf-8-unix)))

;; Alt-g hopper til en given line
(global-set-key "\M-g" 'goto-line)
;; Lad Control + musehjul op/ned skrue op/ned for font størrelse
(global-set-key [C-mouse-4] 'text-scale-increase)
(global-set-key [C-mouse-5] 'text-scale-decrease)

(custom-set-variables
  ;; custom-set-variables was added by Custom.
  ;; If you edit it by hand, you could mess it up, so be careful.
  ;; Your init file should contain only one such instance.
  ;; If there is more than one, they won't work right.
 '(markdown-command "Markdown.pl")
 '(markdown-css-path "file:///home/m00522/projects/docs/public/css/md.css")
 '(show-paren-mode t))
(custom-set-faces
  ;; custom-set-faces was added by Custom.
  ;; If you edit it by hand, you could mess it up, so be careful.
  ;; Your init file should contain only one such instance.
  ;; If there is more than one, they won't work right.
 )

(defun toggle-fullscreen (&optional f)
  (interactive)
  (let ((current-value (frame-parameter nil 'fullscreen)))
       (set-frame-parameter nil 'fullscreen
                            (if (equal 'fullboth current-value)
                                (if (boundp 'old-fullscreen) old-fullscreen nil)
                                (progn (setq old-fullscreen current-value)
                                       'fullboth)))))


(global-set-key [f11] 'toggle-fullscreen)
(global-set-key (kbd "C-SPC") 'dabbrev-expand) ; CTRL-SPC to codecomplete
(global-set-key (kbd "C-x r") 'revert-buffer) ; reload file from disk
(global-set-key (kbd "C-z") 'undo) ; set CRTL-z to undo
(global-set-key "\C-a" 'mark-whole-buffer) ; Select all
(global-linum-mode)
(tool-bar-mode 0)
(delete-selection-mode t)
(setq display-time-24hr-format t)


(add-hook 'slime-repl-mode-hook 'clojure-mode-font-lock-setup)

(setq url-proxy-services '(("no_proxy" . "localhost")
                           ("http" . "sltarray02:8080")))

(package-initialize)
(add-to-list 'package-archives '("marmalade" . "http://marmalade-repo.org/packages/"))


(add-hook 'clojure-mode-hook
          (lambda ()
            (highlight-parentheses-mode t)
;;            (paredit-mode t)
            (slime-mode t)))

(setq hl-paren-colors
      '("red1" "orange1" "yellow1" "green1" "cyan1" "slateblue1" "magenta1" "purple"))

(load-theme 'tango-dark)

(setq special-display-buffer-names
           '("*slime-repl clojure*"))

(setq-default cursor-type 'bar)

; (global-hl-line-mode 1)
;  (set-face-background hl-line-face "gray13")
; (set-face-attribute hl-line-face nil :underline "yellow" :foreground "#2e3436")