~localleader , -> 'SPC ,' and ivy-read -> completing-read
This commit is contained in:
@@ -20,7 +20,7 @@ Load the literate.el file to start parsing.
|
|||||||
- Using the font [[https://sourcefoundry.org/hack/][Hack]]
|
- Using the font [[https://sourcefoundry.org/hack/][Hack]]
|
||||||
#+BEGIN_SRC elisp
|
#+BEGIN_SRC elisp
|
||||||
(after! core-keybinds
|
(after! core-keybinds
|
||||||
(setq doom-localleader-key ",")
|
(setq doom-localleader-key "SPC ,")
|
||||||
(setq doom-theme 'doom-molokai)
|
(setq doom-theme 'doom-molokai)
|
||||||
(setq doom-font (font-spec :family "Hack" :size 17)))
|
(setq doom-font (font-spec :family "Hack" :size 17)))
|
||||||
#+END_SRC
|
#+END_SRC
|
||||||
@@ -261,11 +261,7 @@ Emacs doesn't have the full range of styles that I want, so lemme just do it mys
|
|||||||
(interactive)
|
(interactive)
|
||||||
(let* ((tags-file (counsel-etags-locate-tags-file))
|
(let* ((tags-file (counsel-etags-locate-tags-file))
|
||||||
(cands (counsel-etags-collect-cands "void.*Test" t buffer-file-name)))
|
(cands (counsel-etags-collect-cands "void.*Test" t buffer-file-name)))
|
||||||
(ivy-read
|
(let ((item (completing-read "Choose test: " cands)))
|
||||||
"Choose test: "
|
|
||||||
cands
|
|
||||||
:action
|
|
||||||
(lambda (item)
|
|
||||||
;; From the counsel-etags file-open-api function
|
;; From the counsel-etags file-open-api function
|
||||||
(when (string-match "\\`\\(.*?\\):\\([0-9]+\\):\\(.*\\)\\'" item)
|
(when (string-match "\\`\\(.*?\\):\\([0-9]+\\):\\(.*\\)\\'" item)
|
||||||
(let*
|
(let*
|
||||||
@@ -273,12 +269,10 @@ Emacs doesn't have the full range of styles that I want, so lemme just do it mys
|
|||||||
(linenum (match-string-no-properties 2 item))
|
(linenum (match-string-no-properties 2 item))
|
||||||
;; always calculate path relative to TAGS
|
;; always calculate path relative to TAGS
|
||||||
(default-directory (counsel-etags-tags-file-directory)))
|
(default-directory (counsel-etags-tags-file-directory)))
|
||||||
|
|
||||||
(counsel-etags-push-marker-stack (point-marker))
|
(counsel-etags-push-marker-stack (point-marker))
|
||||||
(find-file file)
|
(find-file file)
|
||||||
(counsel-etags-forward-line linenum)
|
(counsel-etags-forward-line linenum)
|
||||||
(omnisharp-unit-test-at-point))))
|
(omnisharp-unit-test-at-point)))))))
|
||||||
:caller 'dx:csharp/get-unit-tests-in-project))))
|
|
||||||
#+END_SRC
|
#+END_SRC
|
||||||
*** Redo omnisharp-emit-results
|
*** Redo omnisharp-emit-results
|
||||||
- Reimplemented omnisharp-emit-results to emit stdout regardless of whether the
|
- Reimplemented omnisharp-emit-results to emit stdout regardless of whether the
|
||||||
|
|||||||
Reference in New Issue
Block a user