From 4b114554f2f72773e50fea0e23649ec37b8a5e87 Mon Sep 17 00:00:00 2001 From: jao Date: Fri, 25 Jun 2021 23:53:11 +0100 Subject: completion: corfu-auto --- attic/misc.org | 72 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++ completion.org | 14 +++++++++-- init.org | 74 +--------------------------------------------------------- 3 files changed, 85 insertions(+), 75 deletions(-) diff --git a/attic/misc.org b/attic/misc.org index b902e18..2daefcd 100644 --- a/attic/misc.org +++ b/attic/misc.org @@ -1,5 +1,57 @@ #+title: Miscellaneous config bits that i don't use anymore +* elixir +*** packages + #+begin_src emacs-lisp + (use-package elixir-mode + :ensure t + :custom (lsp-clients-elixir-server-executable + (expand-file-name "~/usr/share/elixir-ls/language_server.sh")) + ;; :bind (:map elixir-mode-map (("C-c C-z" . jao-vterm-repl-pop-to-repl))) + ) + + (use-package mix + :ensure t + :hook (elixir-mode . mix-minor-mode) + ;; :init (jao-vterm-repl-register "mix.exs" "iex -S mix" "^iex([0-9]+)> ") + :diminish ((mix-minor-mode . ""))) + + (use-package exunit :ensure t) + #+end_src +*** hydra + #+begin_src emacs-lisp + (major-mode-hydra-define elixir-mode nil + ("Doc" + (("dd" lsp-describe-thing-at-point "Describe thing at point")) + "Xref" + (("xd" xref-find-definitions "Definitions") + ("xo" xref-find-definitions-other-window "-> other win") + ("xr" xref-find-references "References")) + "LSP" + (("lg" lsp-goto-implementation "Implementation") + ("lf" lsp-format-buffer "Format buffer") + ("ls" lsp-describe-session "Describe session")) + "LSP modes" + (("Tl" lsp-lens-mode "Lens mode" :toggle t) + ("Td" lsp-modeline-diagnostics-mode "Modeline diagnostics" :toggle t) + ("Tb" lsp-headerline-breadcrumb-mode "Header breadcrumb" :toggle t) + ("Ti" lsp-toggle-trace-io "Trace I/O" :toggle lsp-print-io)) + "Mix" + (("me" mix-execute-task "Execute mix task") + ("mt" mix-test "Run tests") + ("mc" mix-compile "Compile") + ("mm" jao-elixir-pop-to-iex "Pop to iex")) + "Mix subproject" + (("Me" (lambda () (interactive) (mix-execute-task nil t)) + "Execute task") + ("Mt" (lambda () (interactive) (mix-compile nil t)) "Compile") + ("Mt" (lambda () (interactive) (mix-test nil t)) "Run tests")) + "Tests" + (("tt" exunit-verify-single "Run single test") + ("tr" exunit-rerun "Re-run tests") + ("ta" exunit-verify "Run test suites") + ("tA" exunit-verify-all "Run all test suites")))) + #+end_src * mpdel #+BEGIN_SRC emacs-lisp (jao-load-path "libmpdel") @@ -508,3 +560,23 @@ (use-package jao-vterm-repl) (jao-define-attached-buffer "^\\* vrepl - .+ \\*.*") #+end_src +* ednc + #+begin_src emacs-lisp + (use-package ednc + :ensure t + :diminish) + + (use-package jao-ednc + :after ednc + :commands (jao-ednc-setup) + :config + (jao-ednc-ignore-app "Spotify") + (jao-ednc-ignore-app "NetworkManager") + (defhydra jao-hydra-ednc (:color blue) + "Notifications" + ("s" jao-ednc-show "show last") + ("d" jao-ednc-dismiss "dismiss last") + ("D" jao-ednc-dismiss-all "dismiss all") + ("i" jao-ednc-invoke-last-action "invoke last action") + ("n" jao-ednc-pop "show all"))) + #+end_src diff --git a/completion.org b/completion.org index b3b5964..5fb95ad 100644 --- a/completion.org +++ b/completion.org @@ -7,7 +7,7 @@ (use-package emacs :init (setq completion-category-defaults nil - completion-cycle-threshold 3 + completion-cycle-threshold nil completion-category-overrides '((file (styles . (partial-completion)))))) #+end_src @@ -35,13 +35,23 @@ (use-package corfu :ensure t :init (setq corfu-cycle t + corfu-count 10 + corfu-no-match (propertize "ยทยทยท" 'face 'bold) + corfu-auto t corfu-min-width 20 - corfu-max-width 100) + corfu-max-width 100 + corfu-excluded-modes '(eshell-mode)) :bind (:map corfu-map ("TAB" . corfu-next) ("S-TAB" . corfu-previous))) (corfu-global-mode 1) + + (with-eval-after-load "eshell" + (defun jao-corfu-eshell () + (setq-local corfu-auto nil) + (corfu-mode 1)) + (add-hook 'eshell-mode-hook #'jao-corfu-eshell)) #+end_src * vertico #+begin_src emacs-lisp diff --git a/init.org b/init.org index ff01bd8..7e2f199 100644 --- a/init.org +++ b/init.org @@ -427,7 +427,7 @@ (jao-load-org "exwm.org") (setq jao-exwm-enabled-p t) (display-time-mode -1) - (jao-ednc-setup 95) + ;; (jao-ednc-setup 95) (exwm-enable) (jao-minibuffer-adjust-mode-line-faces) (jao-trisect t) @@ -707,26 +707,6 @@ :init (setq jao-tracking-bkg (if (jao-colors-scheme-dark-p) "grey20" "grey93"))) #+end_src -*** ednc - #+begin_src emacs-lisp - (use-package ednc - :ensure t - :diminish) - - (use-package jao-ednc - :after ednc - :commands (jao-ednc-setup) - :config - (jao-ednc-ignore-app "Spotify") - (jao-ednc-ignore-app "NetworkManager") - (defhydra jao-hydra-ednc (:color blue) - "Notifications" - ("s" jao-ednc-show "show last") - ("d" jao-ednc-dismiss "dismiss last") - ("D" jao-ednc-dismiss-all "dismiss all") - ("i" jao-ednc-invoke-last-action "invoke last action") - ("n" jao-ednc-pop "show all"))) - #+end_src * Calendar, diary, weather *** Diary #+BEGIN_SRC emacs-lisp @@ -2333,58 +2313,6 @@ (idris-stay-in-current-window-on-compiler-error t))) (jao-define-attached-buffer "^\\*idris.*" 0.4) #+end_src -*** Elixir -***** packages - #+begin_src emacs-lisp - (use-package elixir-mode - :ensure t - :custom (lsp-clients-elixir-server-executable - (expand-file-name "~/usr/share/elixir-ls/language_server.sh")) - ;; :bind (:map elixir-mode-map (("C-c C-z" . jao-vterm-repl-pop-to-repl))) - ) - - (use-package mix - :ensure t - :hook (elixir-mode . mix-minor-mode) - ;; :init (jao-vterm-repl-register "mix.exs" "iex -S mix" "^iex([0-9]+)> ") - :diminish ((mix-minor-mode . ""))) - - (use-package exunit :ensure t) - #+end_src -***** hydra - #+begin_src emacs-lisp - (major-mode-hydra-define elixir-mode nil - ("Doc" - (("dd" lsp-describe-thing-at-point "Describe thing at point")) - "Xref" - (("xd" xref-find-definitions "Definitions") - ("xo" xref-find-definitions-other-window "-> other win") - ("xr" xref-find-references "References")) - "LSP" - (("lg" lsp-goto-implementation "Implementation") - ("lf" lsp-format-buffer "Format buffer") - ("ls" lsp-describe-session "Describe session")) - "LSP modes" - (("Tl" lsp-lens-mode "Lens mode" :toggle t) - ("Td" lsp-modeline-diagnostics-mode "Modeline diagnostics" :toggle t) - ("Tb" lsp-headerline-breadcrumb-mode "Header breadcrumb" :toggle t) - ("Ti" lsp-toggle-trace-io "Trace I/O" :toggle lsp-print-io)) - "Mix" - (("me" mix-execute-task "Execute mix task") - ("mt" mix-test "Run tests") - ("mc" mix-compile "Compile") - ("mm" jao-elixir-pop-to-iex "Pop to iex")) - "Mix subproject" - (("Me" (lambda () (interactive) (mix-execute-task nil t)) - "Execute task") - ("Mt" (lambda () (interactive) (mix-compile nil t)) "Compile") - ("Mt" (lambda () (interactive) (mix-test nil t)) "Run tests")) - "Tests" - (("tt" exunit-verify-single "Run single test") - ("tr" exunit-rerun "Re-run tests") - ("ta" exunit-verify "Run test suites") - ("tA" exunit-verify-all "Run all test suites")))) - #+end_src *** Clojure #+begin_src emacs-lisp (use-package clojure-mode -- cgit v1.2.3