94 lines
2.9 KiB
EmacsLisp
94 lines
2.9 KiB
EmacsLisp
;;; icejam-prog-mode.el -- summary -*- lexical-binding: t; -*-
|
|
;;; Commentary:
|
|
;;; Code:
|
|
|
|
;;; 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
|
|
(use-package etags :ensure nil :defer t
|
|
:config
|
|
(setopt tags-revert-without-query t))
|
|
|
|
;;; Show trailing whitespace and remove whitespace on save
|
|
(use-package whitespace :ensure nil
|
|
:hook ((prog-mode . whitespace-mode)
|
|
(text-mode . whitespace-mode)
|
|
(conf-mode . whitespace-mode)
|
|
(before-save . whitespace-cleanup))
|
|
:config
|
|
(setopt
|
|
whitespace-style #'(face trailing empty) ;; New whitespace style
|
|
require-final-newline 't ;; Insert newline on save
|
|
))
|
|
|
|
(setq-default indent-tabs-mode nil)
|
|
|
|
;; Use colorful, matching parens
|
|
;; Rework the code below to enumerate each hook separately:
|
|
(use-package rainbow-delimiters :ensure t :defer t
|
|
:hook ((prog-mode . rainbow-delimiters-mode)
|
|
(text-mode . rainbow-delimiters-mode)
|
|
(elpaca-after-init . electric-pair-mode)
|
|
(elpaca-after-init . show-paren-mode)))
|
|
|
|
;;; Show hex (#aaa) colors as colors
|
|
(use-package rainbow-mode :ensure t :defer t
|
|
:hook ((prog-mode . rainbow-mode)
|
|
(text-mode . rainbow-mode)))
|
|
|
|
;; Dash integration
|
|
(use-package dash-at-point :ensure t :defer t
|
|
:config
|
|
(add-to-list 'dash-at-point-mode-alist '(enh-ruby-mode . "ruby,rubygems,rails"))
|
|
(add-to-list 'dash-at-point-mode-alist '(elixir-ts-mode . "elixir,hex")))
|
|
|
|
|
|
;; By default, use 2 spaces for indentation
|
|
(setopt tab-width 2)
|
|
(setopt tab-stop-list (number-sequence tab-width 200 tab-width))
|
|
|
|
;; Ensure indentation in steps:
|
|
(defun icejam-set-indent (step)
|
|
"Set indentation to STEP."
|
|
(interactive "NNumber of columns for one step: ")
|
|
(setq-local tab-width step)
|
|
(setq-local tab-stop-list (number-sequence step 200 step)))
|
|
|
|
(defun icejam-set-indent-2 () "Set indent to 2." (icejam-set-indent 2))
|
|
(defun icejam-set-indent-4 () "Set indent to 4." (icejam-set-indent 4))
|
|
(defun icejam-set-indent-8 () "Set indent to 8." (icejam-set-indent 8))
|
|
|
|
(use-package column-enforce-mode :ensure t :defer t
|
|
:hook (elpaca-after-init . global-column-enforce-mode)
|
|
:config
|
|
(declare-function column-enforce-n 'column-enforce-mode)
|
|
(defun icejam-column-enforce-80 ()
|
|
"Enforce 80 columns."
|
|
(column-enforce-n 80))
|
|
(defun icejam-column-enforce-100 ()
|
|
"Enforce 100 columns."
|
|
(column-enforce-n 100))
|
|
(defun icejam-column-enforce-98 ()
|
|
"Enforce 98 columns."
|
|
(column-enforce-n 98)))
|
|
|
|
;; PCRE to Emacs regex translations
|
|
(use-package pcre2el :ensure t :defer 3)
|
|
|
|
;; Visual regexp
|
|
(use-package visual-regexp-steroids :ensure t
|
|
:after (pcre2el)
|
|
:config
|
|
;; Use pcre2el for regexes - so that I can use brackets more naturally with
|
|
;; regexp.
|
|
(setopt vr/engine 'pcre2el))
|
|
|
|
(provide 'icejam-prog-mode)
|
|
;;; icejam-prog-mode.el ends here
|