Refactor: make it usable for wider range of audience
This commit is contained in:
parent
db28cbdc20
commit
b201a32285
|
@ -25,13 +25,19 @@
|
||||||
(require 'fg42/cube)
|
(require 'fg42/cube)
|
||||||
(require 'fg42/utils)
|
(require 'fg42/utils)
|
||||||
|
|
||||||
;(autoload-cube 'fg42/initialize-golang "golang/core.el" "Initalize the go mode.")
|
|
||||||
|
|
||||||
|
|
||||||
(defun my-clojure-hook ()
|
(defun my-clojure-hook ()
|
||||||
(paredit-mode 1)
|
(paredit-mode 1)
|
||||||
(aggressive-indent-mode 1)
|
(aggressive-indent-mode 1)
|
||||||
(rainbow-delimiters-mode 1))
|
(rainbow-delimiters-mode 1)
|
||||||
|
(lsp)
|
||||||
|
(sm-greek-lambda)
|
||||||
|
(flymake-mode-off))
|
||||||
|
|
||||||
|
(defun sm-greek-lambda ()
|
||||||
|
(font-lock-add-keywords nil `(("\\<fn\\>"
|
||||||
|
(0 (progn (compose-region (match-beginning 0) (match-end 0)
|
||||||
|
,(make-char 'greek-iso8859-7 107))
|
||||||
|
nil))))))
|
||||||
|
|
||||||
(defcube fg42/clojure-cube
|
(defcube fg42/clojure-cube
|
||||||
"Clojure support cube for fg42."
|
"Clojure support cube for fg42."
|
||||||
|
@ -50,13 +56,7 @@
|
||||||
(fpkg/use clojure-mode
|
(fpkg/use clojure-mode
|
||||||
:hook (clojure-mode . my-clojure-hook)
|
:hook (clojure-mode . my-clojure-hook)
|
||||||
:config
|
:config
|
||||||
(progn
|
(setq lsp-enable-indentation nil)))
|
||||||
(when-flag lsp
|
|
||||||
(add-hook 'clojure-mode-hook
|
|
||||||
(lambda ()
|
|
||||||
(when (not (boundp 'lsp))
|
|
||||||
(require 'lsp)
|
|
||||||
(lsp-deferred))))))))
|
|
||||||
|
|
||||||
(provide 'cubes/clojure)
|
(provide 'cubes/clojure)
|
||||||
;;; clojure.el ends here
|
;;; clojure.el ends here
|
||||||
|
|
Loading…
Reference in New Issue