Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

Fix mode invocation in init script

  • Loading branch information...
commit cd6531eef250af8b77059671ce65fda8750f53ab 1 parent e865f38
@technomancy authored
Showing with 18 additions and 6 deletions.
  1. +18 −6 init.el
View
24 init.el
@@ -2,8 +2,11 @@
-(load "/home/phil/src/elisp/paredit/paredit-beta")
-(load "/home/phil/src/elisp/starter-kit/elpa-to-submit/clojure-mode")
+(setq start-dir (file-name-directory
+ (or (buffer-file-name) load-file-name)))
+
+(dolist (m '("paredit" "clojure-mode" "espresso"))
+ (load (concat start-dir m)))
(fringe-mode 0)
(set-default-font "-unknown-Inconsolata-normal-normal-normal-*-19-*-*-*-m-0-*-*")
@@ -15,9 +18,6 @@
(tool-bar-mode -1)
(blink-cursor-mode -1)
-(setq start-dir (file-name-directory
- (or (buffer-file-name) load-file-name)))
-
(global-set-key (kbd "C-M-h") 'backward-kill-word)
(defface paren-face
@@ -32,4 +32,16 @@
(font-lock-add-keywords nil '(("(\\|)" . 'paren-face)))
(dotimes (n 70)
(set-face-foreground 'paren-face (concat "grey" (number-to-string (- 80 n))))
- (sit-for 0.01)))
+ (sit-for 0.01)))
+
+;; modes
+
+(add-to-list 'auto-mode-alist '("\\.js$" . espresso-mode))
+
+(defun esk-paredit-nonlisp ()
+ "Turn on paredit mode for non-lisps."
+ (interactive)
+ (set (make-local-variable 'paredit-space-delimiter-chars) (list ?\"))
+ (paredit-mode +1))
+
+(add-hook 'clojure-mode-hook 'enable-paredit-mode)
Please sign in to comment.
Something went wrong with that request. Please try again.