74 lines
2.0 KiB
EmacsLisp
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
|