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

Minor refactor/reformatting

Browse source
This commit is contained in:
Henrik Lissner 2018-05-03 15:59:54 +02:00
parent 87aa05ffee
commit c05b16ee6f
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
3 changed files with 6 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

2
modules/feature/evil/config.el
View file

@ -121,7 +121,7 @@
(advice-add #'evil-ex-replace-special-filenames :override #'+evil*resolve-vim-path) (advice-add #'evil-ex-replace-special-filenames :override #'+evil*resolve-vim-path)
;; make `try-expand-dabbrev' from `hippie-expand' work in minibuffer ;; make `try-expand-dabbrev' from `hippie-expand' work in minibuffer
;; @see `he-dabbrev-beg', so we need re-define syntax for '/' ;; @see `he-dabbrev-beg', so we need to redefine syntax for '/'
(defun +evil*fix-dabbrev-in-minibuffer () (defun +evil*fix-dabbrev-in-minibuffer ()
(set-syntax-table (let* ((table (make-syntax-table))) (set-syntax-table (let* ((table (make-syntax-table)))
(modify-syntax-entry ?/ "." table) (modify-syntax-entry ?/ "." table)

4
modules/feature/lookup/config.el
View file

@ -108,7 +108,9 @@ properties:
;; xref ;; xref
;; ;;
(after! xref (def-package! xref
:commands (xref-backend-identifier-at-point xref-find-definitions xref-find-references)
:config
;; By default, `etags--xref-backend' is the default xref backend. No need. ;; By default, `etags--xref-backend' is the default xref backend. No need.
;; We'll set these up ourselves in other modules. ;; We'll set these up ourselves in other modules.
(setq-default xref-backend-functions '(t)) (setq-default xref-backend-functions '(t))

3
modules/ui/doom-modeline/config.el
View file

@ -428,6 +428,7 @@ directory, the file name, and its state (modified, read-only or non-existent)."
(defvar-local +doom-modeline--flycheck nil) (defvar-local +doom-modeline--flycheck nil)
(add-hook 'flycheck-status-changed-functions #'+doom-modeline|update-flycheck-segment) (add-hook 'flycheck-status-changed-functions #'+doom-modeline|update-flycheck-segment)
(add-hook 'flycheck-mode-hook #'+doom-modeline|update-flycheck-segment) (add-hook 'flycheck-mode-hook #'+doom-modeline|update-flycheck-segment)
(defun +doom-modeline|update-flycheck-segment (&optional status) (defun +doom-modeline|update-flycheck-segment (&optional status)
(setq +doom-modeline--flycheck (setq +doom-modeline--flycheck
(pcase status (pcase status
@ -480,7 +481,7 @@ lines are selected, or the NxM dimensions of a block selection."
(let ((cols (abs (- (doom-column end) (let ((cols (abs (- (doom-column end)
(doom-column beg))))) (doom-column beg)))))
(format "%dx%dB" lines cols))) (format "%dx%dB" lines cols)))
((eq 'line evil-visual-selection) ((eq evil-visual-selection 'line)
(format "%dL" lines)) (format "%dL" lines))
((> lines 1) ((> lines 1)
(format "%dC %dL" (- end beg) lines)) (format "%dC %dL" (- end beg) lines))