FG42
/
FG42
1
0
Fork 1
Code Issues Pull Requests 1 Packages Projects Releases Wiki Activity

rainbow delimiter added to clojure extension

This commit is contained in:
Sameer Rahmani 2016-11-20 12:47:45 +03:30
parent 797d8279bd
commit c6756d1c55
4 changed files with 12 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
fg42-config.el
View File

@ -1,5 +1,5 @@
(add-to-list 'load-path (concat (getenv "FG42_HOME") "/lib"))
(toggle-debug-on-error)
;(toggle-debug-on-error)
(require 'fg42)
;; Load the default theme
@ -18,7 +18,7 @@
;'php
'clojure
;'python
;'ruby
'ruby
)
;; Load user config file in ~/.fg42

3
lib/extensions/clojure.el
View File

@ -15,10 +15,11 @@
(depends-on 'clojure-mode-extra-font-locking)
;(depends-on 'core-async-mode)
(depends-on 'yesql-ghosts)
(depends-on 'rainbow-delimiters)
;; Extension -------------------------------------
(extension clojure
:version "2.31"
:version "2.32"
:on-initialize extensions/clojure-initialize)
(provide 'extensions/clojure)

2
lib/extensions/clojure/core.el
View File

@ -183,6 +183,7 @@
(require 'hl-sexp)
(require 'paredit)
;; indent [quiescent.dom :as d] specially
(define-clojure-indent
(d/a 1)
@ -285,6 +286,7 @@
(add-hook 'cider-repl-mode-hook #'paredit-mode)
(add-hook 'clojure-mode-hook #'hl-sexp-mode)
(add-hook 'paredit-mode-hook 'setup-keys)
(add-hook 'clojure-mode-hook 'rainbow-delimiters-mode)
(define-key clojure-mode-map (kbd "C-`") 'live-cycle-clj-coll)
(define-key cider-repl-mode-map (kbd "<home>") nil)

11
lib/extensions/python/init.el
View File

@ -74,7 +74,7 @@
;(require 'eldoc-mode)
(subword-mode +1)
(anaconda-mode 1)
;(anaconda-mode 1)
(eldoc-mode 1)
(setup-keybindings)
@ -92,8 +92,8 @@
#'python-imenu-create-flat-index))
(add-hook 'post-self-insert-hook
#'electric-layout-post-self-insert-function nil 'local)
(add-hook 'after-save-hook 'python-mode-set-encoding nil 'local))
;(add-hook 'after-save-hook 'python-mode-set-encoding nil 'local))
)
;;;###autoload
(defun extensions/python-initialize ()
(message "Initializing 'python' extension.")
@ -122,7 +122,8 @@
(ability python-code-completion ('code-completion)
"Gives FG42 the ability to complete python codes."
(when (boundp 'company-backends)
(add-to-list 'company-backends 'company-anaconda))))
;(when (boundp 'company-backends)
; (add-to-list 'company-backends 'company-anaconda))))
))
(provide 'extensions/python/init)