Refactor :electric setting

This commit is contained in:
Henrik Lissner 2017-02-20 20:55:21 -05:00
parent a841b3ce99
commit afc5b622bb
8 changed files with 10 additions and 10 deletions

View file

@ -33,7 +33,7 @@
(add-hook 'c++-mode-hook '+cc|extra-fontify-c++)
(@set :electric '(c-mode c++-mode objc-mode java-mode)
:chars ?\n ?\})
:chars '(?\n ?\}))
(@set :company-backend
'(c-mode c++-mode objc-mode)

View file

@ -15,12 +15,12 @@
(@def-package yaml-mode
:mode "\\.ya?ml$"
:config
(@set :electric 'yaml-mode :chars ?\n ?\: ?\-))
(@set :electric 'yaml-mode :chars '(?\n ?\: ?\-)))
(@def-package json-mode :mode "\\.js\\(on\\|[hl]int\\(rc\\)?\\)$"
:config
(@set :electric 'json-mode :chars ?\n ?: ?{ ?}))
(@set :electric 'json-mode :chars '(?\n ?: ?{ ?})))
(@def-package vimrc-mode

View file

@ -7,7 +7,7 @@
(add-hook 'lua-mode-hook 'flycheck-mode)
:config
(@set :company-backend 'lua-mode '(company-lua company-yasnippet))
(@set :electric 'lua-mode :words "else" "end")
(@set :electric 'lua-mode :words '("else" "end"))
(@set :repl 'lua-mode '+lua/repl)
;; sp's lua-specific rules are obnoxious, so we disable them

View file

@ -11,7 +11,7 @@
markdown-gfm-additional-languages '("sh"))
:config
(@set :electric 'markdown-mode :chars "+" "#")
(@set :electric 'markdown-mode :chars '(?+ ?#))
(@add-hook markdown-mode
(auto-fill-mode +1)

View file

@ -9,7 +9,7 @@
:config
(@set :build 'rake 'ruby-mode '+ruby/rake)
(@set :company-backend 'ruby-mode '(company-dabbrev-code))
(@set :electric 'ruby-mode :words "else" "end" "elseif")
(@set :electric 'ruby-mode :words '("else" "end" "elseif"))
(@set :repl 'ruby-mode 'inf-ruby)
(setq ruby-deep-indent-paren t)
;; Don't interfere with my custom RET behavior

View file

@ -7,7 +7,7 @@
(@add-hook sh-mode '(flycheck-mode highlight-numbers-mode +sh|extra-fontify))
:config
(@set :company-backend 'sh-mode '(company-shell))
(@set :electric 'sh-mode :words "else" "elif" "fi" "done" "then" "do" "esac" ";;")
(@set :electric 'sh-mode :words '("else" "elif" "fi" "done" "then" "do" "esac" ";;"))
(@set :repl 'sh-mode '+sh/repl)
(setq sh-indent-after-continuation 'always)

View file

@ -6,7 +6,7 @@
(add-hook 'typescript-mode-hook 'rainbow-delimiters-mode)
:config
(@set :company-backend 'typescript-mode '(company-tide))
(@set :electric 'typescript-mode :chars ?\} ?\) :words "||" "&&")
(@set :electric 'typescript-mode :chars '(?\} ?\)) :words '("||" "&&"))
;; TODO emr definitions for:
;; + tide-jump-back

View file

@ -23,8 +23,8 @@
trigger electric indentation."
(declare (indent 1))
(let ((modes (if (listp modes) modes (list modes)))
(chars (doom-mplist-get plist :chars))
(words (doom-mplist-get plist :words)))
(chars (plist-get plist :chars))
(words (plist-get plist :words)))
(when (or chars words)
(let ((fn-name (intern (format "doom--electric-%s" (s-join "-" (mapcar 'symbol-name modes))))))
`(progn