hl mode added

fg42

@@ -1,7 +1,7 @@
 #! /bin/sh
 
 #export FG42_HOME=--PATH--
-export FG42_HOME=$HOME/src/FG42/
+export FG42_HOME=$HOME/src/FG42/FG42
 
 #emacs -Q --no-splash --name FG42 --title FG42 -q -l --PATH--/fg42-config.el "$@"
 emacs-snapshot --name FG42 -Q -q --no-splash --title FG42 -l $FG42_HOME/fg42-config.el "$@"

lib/extensions/clojure/init.el

@@ -31,6 +31,10 @@
            (require 'paredit)
            (add-hook 'clojure-mode-hook #'paredit-mode)
            (add-hook 'cider-repl-mode-hook #'paredit-mode)
+           ;(define-key clojure-mode-map (kbd "M-<right>") 'paredit-forward-slurp-sexp)
+           ;(define-key clojure-mode-map (kbd "M-<left>") 'paredit-backward-slurp-sexp)
+           ;(define-key clojure-mode-map (kbd "C-<right>") 'right-word)
+           ;(define-key clojure-mode-map (kbd "C-<left>") 'left-word)
 
            (add-hook 'clojure-mode-hook #'hl-sexp-mode))
 

lib/extensions/development.el

@@ -14,6 +14,7 @@
 (depends-on 'direx)
 (depends-on 'popwin)
 (depends-on 'ag)
+(depends-on 'hl-sexp)
 (depends-on 'smart-mode-line)
 
 (with-ability spell

lib/extensions/development/init.el

@@ -29,6 +29,11 @@
   "Development plugin initialization."
   (message "Initializing 'development' extension.")
 
+  (ability hl ()
+           "Highligh the current block of code"
+           (require 'hl-sexp)
+           (add-hook 'prog-mode-hook #'hl-sexp-mode))
+
   (ability code-completion ()
            "Use company mode to provides a complete auto completion framwork."
            (require 'company)