1
0
Fork 0
dotfiles/dot_spacemacs.d/public/coding-config.el

74 lines
2.0 KiB
EmacsLisp

;;; bascht --- Code configs
;;; Commentary:
;;; Coding related settings / libs
;;; Code:
(use-package company)
(add-to-list 'company-backends 'company-tern)
(add-hook 'js-mode-hook
'tern-mode)
(add-hook 'yaml-mode-hook
'indent-guide-mode
(lambda () (auto-fill-mode -1)))
(add-hook 'prog-mode-hook
'company-mode
(lambda () (flyspell-mode -1)))
(add-hook 'text-mode-hook
'hl-line-mode)
(add-to-list 'auto-mode-alist
'("\\.coffee.erb\\'" . coffee-mode))
(use-package flycheck
:ensure t
:init (global-flycheck-mode))
(use-package editorconfig
:ensure t
:init
(add-hook 'prog-mode-hook (editorconfig-mode 1))
(add-hook 'text-mode-hook (editorconfig-mode 1)))
(defun colorize-compilation-buffer () "Nice colours there."
(read-only-mode)
(ansi-color-apply-on-region (point-min) (point-max))
(read-only-mode))
(add-hook 'compilation-filter-hook 'colorize-compilation-buffer)
(defun do-in-root (f) "Execute command F in project root."
(if (projectile-project-p)
(funcall f (projectile-project-root))
(error "You're not in project")))
(defun helm-do-ag-in-root () "Open helm ag current project root."
(interactive)
(do-in-root 'helm-do-ag))
(defun do-ag-in-root (string) "Search for ag for STRING in current project root."
(interactive (list (read-from-minibuffer "Search string: " (ag/dwim-at-point))))
(do-in-root '(lambda (root) (ag/search string root))))
(setq rspec-command-options "--format progress")
(setq rspec-spec-command "rspec")
(setq ruby-insert-encoding-magic-comment nil)
(setq flycheck-rust-executable "/usr/local/bin/rustc")
(setq flycheck-rust-library-path (quote ("/usr/local/lib/rustlib")))
;;; Fix up rust mode
(setenv "LD_LIBRARY_PATH"
(let ((current (getenv "LD_LIBRARY_PATH"))
(new "/usr/local/lib/rustlib"))
(if current (concat new ":" current) new)))
(provide 'coding-config)
;;; coding-config.el ends here