.
This commit is contained in:
parent
61a3d056ec
commit
4ededaab50
1 changed files with 23 additions and 5 deletions
|
@ -147,7 +147,7 @@
|
||||||
(tool-bar-mode nil)
|
(tool-bar-mode nil)
|
||||||
:custom-face
|
:custom-face
|
||||||
;;(default ((t (:weight bold :height 113 :width normal :family "VictorMono Nerd Font"))))
|
;;(default ((t (:weight bold :height 113 :width normal :family "VictorMono Nerd Font"))))
|
||||||
(default ((t (:weight regular :height 105 :width normal :family "MonaspiceXe Nerd Font Mono"))))
|
(default ((t (:weight regular :height 105 :width narrow :family "MonaspiceXe Nerd Font Mono"))))
|
||||||
:hook
|
:hook
|
||||||
(minibuffer-setup . cursor-intangible-mode)
|
(minibuffer-setup . cursor-intangible-mode)
|
||||||
:config
|
:config
|
||||||
|
@ -301,14 +301,22 @@
|
||||||
;; load preferred theme
|
;; load preferred theme
|
||||||
(load-theme 'lambda-dark))
|
(load-theme 'lambda-dark))
|
||||||
|
|
||||||
|
;;;;; Long line handling
|
||||||
|
|
||||||
(use-package visual-fill-column
|
(use-package visual-fill-column
|
||||||
:custom
|
:custom
|
||||||
(visual-fill-column-center-text t)
|
(visual-fill-column-center-text t)
|
||||||
(visual-fill-column-enable-sensible-window-split t)
|
(visual-fill-column-enable-sensible-window-split t)
|
||||||
:hook visual-line-mode)
|
:hook
|
||||||
|
(prog-mode . visual-line-mode)
|
||||||
|
visual-line-mode)
|
||||||
|
|
||||||
(use-package adaptive-wrap
|
(use-package adaptive-wrap
|
||||||
:hook visual-fill-column)
|
:config
|
||||||
|
(setq-default adaptive-wrap-extra-indent 2)
|
||||||
|
:hook
|
||||||
|
visual-fill-column
|
||||||
|
(visual-line-mode . adaptive-wrap-prefix-mode))
|
||||||
|
|
||||||
;;;; Security
|
;;;; Security
|
||||||
(use-package keychain-environment
|
(use-package keychain-environment
|
||||||
|
@ -495,10 +503,10 @@
|
||||||
(evil-snipe-repeat-scope 'whole-buffer)
|
(evil-snipe-repeat-scope 'whole-buffer)
|
||||||
(evil-snipe-spillover-scope 'whole-buffer)
|
(evil-snipe-spillover-scope 'whole-buffer)
|
||||||
(evil-snipe-tab-increment t)
|
(evil-snipe-tab-increment t)
|
||||||
|
:custom
|
||||||
:hook
|
:hook
|
||||||
evil-mode
|
evil-mode
|
||||||
(evil-mode . evil-snipe-override-mode)
|
(evil-mode . evil-snipe-override-mode)
|
||||||
(evil-mode . evil-snipe-mode)
|
|
||||||
(magit-mode . turn-off-evil-snipe-override-mode)
|
(magit-mode . turn-off-evil-snipe-override-mode)
|
||||||
;; See https://github.com/hlissner/evil-snipe/issues/95
|
;; See https://github.com/hlissner/evil-snipe/issues/95
|
||||||
;; :config
|
;; :config
|
||||||
|
@ -722,11 +730,21 @@ Point must be at the beginning of balanced expression (sexp)."
|
||||||
|
|
||||||
;;;;; Clojure
|
;;;;; Clojure
|
||||||
(use-package clojure-ts-mode
|
(use-package clojure-ts-mode
|
||||||
|
:preface
|
||||||
|
(defun embark-eglot-rename (from to)
|
||||||
|
"Renames the symbol at point."
|
||||||
|
(interactive "sRename: \nsRename %s to: ")
|
||||||
|
(funcall-interactively #'eglot-rename to))
|
||||||
|
|
||||||
:delight ""
|
:delight ""
|
||||||
:after tree-sitter
|
:after (tree-sitter embark)
|
||||||
:config
|
:config
|
||||||
(require 'sesman)
|
(require 'sesman)
|
||||||
(sesman-install-menu clojure-mode-map)
|
(sesman-install-menu clojure-mode-map)
|
||||||
|
(defvar-keymap embark-clj-identifier-map
|
||||||
|
:parent embark-identifier-map
|
||||||
|
"c" #'embark-eglot-rename)
|
||||||
|
(add-to-list 'embark-keymap-alist '(identifier . embark-clj-identifier-map))
|
||||||
:hook
|
:hook
|
||||||
((clojure-ts-mode . eglot-ensure)
|
((clojure-ts-mode . eglot-ensure)
|
||||||
(clojure-ts-mode . prettify-symbols-mode)
|
(clojure-ts-mode . prettify-symbols-mode)
|
||||||
|
|
Loading…
Reference in a new issue