jappy

My Emacs Init File - init.el

Oct 16th, 2012
92
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lisp 1.31 KB | None | 0 0
  1. (require 'package)
  2. (add-to-list 'package-archives
  3.          '("marmalade" . "http://marmalade-repo.org/packages/") t)
  4. (package-initialize)
  5.  
  6. (when (not package-archive-contents)
  7.   (package-refresh-contents))
  8.  
  9. ;; Add in your own as you wish:
  10. (defvar my-packages '(color-theme rainbow-delimiters paredit slime-repl clojure-mode starter-kit)
  11.   "A list of packages to ensure are installed at launch.")
  12.  
  13. (dolist (p my-packages)
  14.   (when (not (package-installed-p p))
  15.     (package-install p)))
  16.  
  17. (require 'color-theme)
  18. ;(color-theme-clarity)
  19. ;(color-theme-jsc-dark)  
  20. ;(color-theme-euphoria)
  21. ;(color-theme-oswald)
  22. ;(color-theme-cheap-goldenrod)
  23. (color-theme-clarity)
  24. ;(color-theme-cooper-dark)
  25. ;(color-theme-comidia)
  26. ;(color-theme-blackboard)
  27.  
  28. (require 'rainbow-delimiters)
  29. (global-rainbow-delimiters-mode "on")
  30.  
  31. ;(defun turn-on-paredit () (paredit-mode 1))
  32. ;(add-hook 'clojure-mode-hook 'turn-on-paredit)
  33.  
  34. (add-hook 'slime-repl-mode-hook
  35.           (defun clojure-mode-slime-font-lock ()
  36.             (require 'clojure-mode)
  37.             (let (font-lock-mode)
  38.               (clojure-mode-font-lock-setup))))
  39.  
  40. (defun remove-dos-eol ()
  41.   "Do not show ^M in files containing mixed UNIX and DOS line endings."
  42.   (interactive)
  43.   (setq buffer-display-table (make-display-table))
  44.   (aset buffer-display-table ?\^M []))
Advertisement
Add Comment
Please, Sign In to add comment