emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

O'byte-compiler

Browse source 
Who forbade the obsolete,
Hooks, functions; adieu.

(And an unused argument too)
This commit is contained in:
Henrik Lissner 2019-02-02 16:08:00 -05:00
parent 951b2be7d1
commit 99fd8b4e1b
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
4 changed files with 5 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

2
modules/config/default/+evil-bindings.el
View file

@ -616,7 +616,7 @@
:desc "Git revert file" "R" #'vc-revert) :desc "Git revert file" "R" #'vc-revert)
(:when (featurep! :tools magit) (:when (featurep! :tools magit)
:desc "Magit blame" "b" #'magit-blame-addition :desc "Magit blame" "b" #'magit-blame-addition
:desc "Magit commit" "c" #'magit-commit :desc "Magit commit" "c" #'magit-commit-create
:desc "Magit clone" "C" #'+magit/clone :desc "Magit clone" "C" #'+magit/clone
:desc "Magit dispatch" "d" #'magit-dispatch-popup :desc "Magit dispatch" "d" #'magit-dispatch-popup
:desc "Magit find-file" "f" #'magit-find-file :desc "Magit find-file" "f" #'magit-find-file

2
modules/editor/format/autoload/format.el
View file

@ -201,7 +201,7 @@ snippets or single lines."
(save-restriction (save-restriction
(narrow-to-region beg end) (narrow-to-region beg end)
(let ((+format-region-p t)) (let ((+format-region-p t))
(call-interactively #'+format/buffer)))) (+format/buffer arg))))
;;;###autoload ;;;###autoload
(defun +format/region-or-buffer (beg end &optional arg) (defun +format/region-or-buffer (beg end &optional arg)

2
modules/feature/snippets/autoload/snippets.el
View file

@ -107,7 +107,7 @@ buggy behavior when <delete> is pressed in an empty field."
;; Commands ;; Commands
;;;###autoload ;;;###autoload
(defun +snippets/browse (arg) (defun +snippets/browse (_arg)
"TODO" "TODO"
(interactive "P") (interactive "P")
(doom-project-browse +snippets-dir)) (doom-project-browse +snippets-dir))

4
modules/tools/editorconfig/config.el
View file

@ -49,7 +49,7 @@ extension, try to guess one."
(when (and (equal (gethash 'trim_trailing_whitespace props) "true") (when (and (equal (gethash 'trim_trailing_whitespace props) "true")
(bound-and-true-p ws-butler-mode)) (bound-and-true-p ws-butler-mode))
(ws-butler-mode -1))) (ws-butler-mode -1)))
(add-hook 'editorconfig-custom-hooks #'+editorconfig|disable-ws-butler-maybe) (add-hook 'editorconfig-after-apply-functions #'+editorconfig|disable-ws-butler-maybe)
(defun +editorconfig|disable-indent-detection (props) (defun +editorconfig|disable-indent-detection (props)
"Inhibit `dtrt-indent' if an explicit indent_style and indent_size is "Inhibit `dtrt-indent' if an explicit indent_style and indent_size is
@ -57,7 +57,7 @@ specified by editorconfig."
(when (or (gethash 'indent_style props) (when (or (gethash 'indent_style props)
(gethash 'indent_size props)) (gethash 'indent_size props))
(setq doom-inhibit-indent-detection t))) (setq doom-inhibit-indent-detection t)))
(add-hook 'editorconfig-custom-hooks #'+editorconfig|disable-indent-detection) (add-hook 'editorconfig-after-apply-functions #'+editorconfig|disable-indent-detection)
;; Editorconfig makes indentation too rigid in Lisp modes, so tell ;; Editorconfig makes indentation too rigid in Lisp modes, so tell
;; editorconfig to ignore indentation there. The dynamic indentation support ;; editorconfig to ignore indentation there. The dynamic indentation support