commit e8a1f1cb0f4a924799689f1e0f8e3e2c4c5543e7
from: mtmn <miro@haravara.org>
date: Tue Sep  1 21:41:50 2026 UTC

add janet, corfu and evil binds

commit - dc1ccf98dbab5ba47112dbdaa443c3632d032dc1
commit + e8a1f1cb0f4a924799689f1e0f8e3e2c4c5543e7
blob - 5f5c77159bcda02b0740ea0a2ecb85683555a1f5
blob + 01fce5cc739a1e6769ce460ac2e1feb760e14488
--- init.el
+++ init.el
@@ -122,6 +122,7 @@
  (elpaca fontaine)
  (elpaca (tramp-rpc :host github :repo "ArthurHeymans/emacs-tramp-rpc"
                     :files ("lisp/*.el")))
+ (elpaca (janet-ts-mode :host github :repo "sogaiu/janet-ts-mode"))
  (elpaca (term-sessions :host github :repo "ArthurHeymans/emacs-term-sessions")))
 
 (elpaca-wait)
blob - e9a699b214afe026967272473d5426f1a0154b65
blob + 2c7dd225dfc76fae1a2c6fbe90e74fdeaed90346
--- lisp/setup-cmp.el
+++ lisp/setup-cmp.el
@@ -13,6 +13,8 @@
 (defvar vertico-map)
 (defvar corfu-map)
 (defvar tempel-map)
+(declare-function corfu-popupinfo-mode "corfu-popupinfo" (&optional arg))
+(defvar corfu-popupinfo-map)
 
 (setopt completion-cycle-threshold 3
         tab-always-indent 'complete)
@@ -51,6 +53,14 @@
               ("C-b"   . corfu-scroll-down)
               ("C-f"   . corfu-scroll-up)))
 
+(use-package corfu-popupinfo
+  :after corfu
+  :hook (corfu-mode . corfu-popupinfo-mode)
+  :bind (:map corfu-popupinfo-map
+              ("M-h" . corfu-popupinfo-toggle-doc)
+              ("M-w" . corfu-popupinfo-toggle-symbol)
+              ("M-i" . corfu-popupinfo-toggle-doc)))
+
 (declare-function dabbrev-capf "dabbrev")
 
 (defun mine-dabbrev-setup-capf ()
blob - 229fffa79a1a779c1af664522d6bbf5228cc1871
blob + e4999bf7bffaad4bfad728ff5e1ffbf3ade94c0f
--- lisp/setup-evil.el
+++ lisp/setup-evil.el
@@ -15,6 +15,7 @@
 (declare-function consult-recent-file "consult" ())
 (declare-function mine-consult-project-search "setup-search" (&optional dir initial))
 (declare-function evil-org-agenda-set-keys "evil-org-agenda" ())
+(declare-function avy-goto-line "avy" ())
 (defvar evil-insert-state-map)
 
 (defvar-keymap mine-evil-leader-map
@@ -38,7 +39,9 @@
   (add-hook 'git-commit-setup-hook #'evil-insert-state)
   (evil-set-initial-state 'eat-mode 'emacs)
 
-  (evil-define-key '(normal visual) 'global (kbd "SPC") mine-evil-leader-map))
+  (evil-define-key '(normal visual) 'global
+                   (kbd "SPC") mine-evil-leader-map
+                   (kbd "gv") #'avy-goto-line))
 
 (use-package evil-collection
   :after evil
blob - 8f415f81523d61c38f8412dd6077120eb062d8ac
blob + 9dae534649a5be7734fd30e6b2bc3fb01f1b1685
--- lisp/setup-ui.el
+++ lisp/setup-ui.el
@@ -43,7 +43,7 @@
                :inherit proto
                :default-height 180)
               (unifont :default-family "UnifontExMono" :default-height 120)
-              (uw :default-family "Ttyp0 OTB" :default-height 150)
+              (uw :default-family "Ttyp0 OTB" :default-height 130)
               (go :default-family "Go Mono" :default-height 140)
               (dsm :default-family "Droid Sans Mono Dotted" :default-height 120)
               (sudo :default-family "Sudo" :default-height 160)
@@ -60,7 +60,7 @@
     (fontaine-mode 1)
     (fontaine-set-preset
      (or (fontaine-restore-latest-preset)
-         (if (eq system-type 'darwin) 'proto-hidpi 'input))))
+         'input)))
 
   (set-fontset-font t 'symbol
                     (font-spec :family "Noto Color Emoji")
@@ -87,7 +87,7 @@
   :if (display-graphic-p)
   :demand t
   :config
-  (load-theme 'ef-day t))
+  (load-theme 'ef-winter t))
 
 (setopt display-line-numbers-width 3)