71 lines
2 KiB
EmacsLisp
71 lines
2 KiB
EmacsLisp
;;; Programmers mode
|
|
|
|
;;; Wrap long lines
|
|
(toggle-truncate-lines t)
|
|
|
|
;;; When pasting/writing over a selection, replace it.
|
|
(delete-selection-mode t)
|
|
|
|
;; When possible, show code documentation
|
|
(global-eldoc-mode t)
|
|
|
|
;; Revert tag tables without asking
|
|
(setq tags-revert-without-query t)
|
|
|
|
;;; Show trailing whitespace and remove whitespace on save
|
|
(use-package whitespace
|
|
:commands whitespace-mode
|
|
:ensure t
|
|
:defer t
|
|
:hook (((prog-mode text-mode) . whitespace-mode)
|
|
(before-save . whitespace-cleanup))
|
|
:init (setq whitespace-style #'(face trailing empty))
|
|
;;; Insert newline on save
|
|
(setq require-final-newline t)
|
|
;;; Tabs are spaces and are general at 2. Guide indent
|
|
;;; with lines
|
|
(setq-default indent-tabs-mode nil))
|
|
|
|
;; Use colorful, matching parens
|
|
(use-package rainbow-delimiters
|
|
:commands rainbow-delimiters-mode
|
|
:ensure t
|
|
:defer t
|
|
:hook (((prog-mode text-mode) . rainbow-delimiters-mode))
|
|
:init
|
|
;;; Match parenthasis (left-right)
|
|
(electric-pair-mode 1))
|
|
|
|
;;; Show hex (#aaa) colors as colors
|
|
(use-package rainbow-mode
|
|
:commands rainbow-mode
|
|
:ensure t
|
|
:hook ((prog-mode text-mode) . rainbow-mode))
|
|
|
|
;; Dash integration
|
|
(use-package dash-at-point
|
|
:commands dash-at-point
|
|
:ensure t
|
|
:defer t
|
|
:bind (:map prog-mode-map ("C-s C-d" . dash-at-point)
|
|
:map text-mode-map ("C-s C-d" . dash-at-point))
|
|
:config
|
|
(add-to-list 'dash-at-point-mode-alist
|
|
;; Configure lookup for Ruby mode
|
|
'(enh-ruby-mode . "ruby,rubygems,rails")))
|
|
|
|
;; By default, use 2 spaces for indentation
|
|
(setq tab-width 2)
|
|
(setq tab-stop-list (number-sequence tab-width 200 tab-width))
|
|
|
|
;; Ensure indentation in steps:
|
|
(defun set-indent (step)
|
|
"Set indentation to X STEPs."
|
|
(interactive "NNumber of columns for one step: ")
|
|
(setq-local tab-width step)
|
|
(setq-local tab-stop-list (number-sequence step 200 step)))
|
|
|
|
(use-package column-enforce-mode
|
|
:ensure t
|
|
:defer t
|
|
:config (global-column-enforce-mode t))
|