mirror of
https://github.com/Swarsel/.dotfiles.git
synced 2025-12-06 09:07:21 +01:00
Transition to most recent state
nix: fix mu4e from nonworking (rebuilt database) fix printer driver that was not working after update add network scanning remove nix-gaming steam addons (now part of nixpkgs) add pass-fuzzel for otp's update deprecated expressions add powerprofilesdaemon to waybar fix hardware group in waybar folding to the wrong side fix emacs server not starting disable swayfx for now (broken in most recent nixpkgs) disable some broken yubikey packages (*-flutter, -manager(-qt), -oath) do not mount eternor by default fix pinentry now requiring an extra expression to work emacs: fix corfu down/up keys not performing as intended add ispell inhibit useless messages unclutter modeline tune cape add crdt (collaborative editing) add avy add diff-hl fix oversight in latex greek symbols that had tau and theta on the same key start eglot more consistently fix dashboard showing footer line and not showing navigation
This commit is contained in:
Swarsel
parent
28ef6da2fb
commit
60eb5e4b35
GPG key ID:
26A54C31F2A4FD84
13 changed files with 1421 additions and 1079 deletions
597
Emacs.org
597
Emacs.org
|
|
@ -281,6 +281,50 @@ This function will check if a directory for which a file we want to open exists;
|
|||
|
||||
|
||||
|
||||
#+end_src
|
||||
|
||||
** ispell
|
||||
|
||||
#+begin_src emacs-lisp
|
||||
|
||||
;; set the NixOS wordlist by hand
|
||||
(setq ispell-alternate-dictionary "/nix/store/gjmvnbs97cnw19wnqh9m075cdbhy8r8g-wordlist-WORDLIST")
|
||||
|
||||
#+end_src
|
||||
|
||||
** Inhibit Messages in Echo Area
|
||||
|
||||
#+begin_src emacs-lisp
|
||||
|
||||
(defun suppress-messages (old-fun &rest args)
|
||||
(cl-flet ((silence (&rest args1) (ignore)))
|
||||
(advice-add 'message :around #'silence)
|
||||
(unwind-protect
|
||||
(apply old-fun args)
|
||||
(advice-remove 'message #'silence))))
|
||||
|
||||
(advice-add 'pixel-scroll-precision :around #'suppress-messages)
|
||||
(advice-add 'mu4e--server-filter :around #'suppress-messages)
|
||||
(advice-add 'org-unlogged-message :around #'suppress-messages)
|
||||
(advice-add 'magit-auto-revert-mode--init-kludge :around #'suppress-messages)
|
||||
|
||||
;; to reenable
|
||||
;; (advice-remove 'timer-event-handler #'suppress-messages)
|
||||
|
||||
(defun who-called-me? (old-fun format &rest args)
|
||||
(let ((trace nil) (n 1) (frame nil))
|
||||
(while (setf frame (backtrace-frame n))
|
||||
(setf n (1+ n)
|
||||
trace (cons (cadr frame) trace)) )
|
||||
(apply old-fun (concat "<<%S>>\n" format) (cons trace args))))
|
||||
|
||||
;; enable to get message backtrace, the first function shown in backtrace calls the other functions
|
||||
;; (advice-add 'message :around #'who-called-me?)
|
||||
|
||||
;; disable to stop receiving backtrace
|
||||
;; (advice-remove 'message #'who-called-me?)
|
||||
|
||||
|
||||
#+end_src
|
||||
|
||||
** undo-tree
|
||||
|
|
@ -407,11 +451,12 @@ Base emacs undo logic is very useful, but not easy to understand. I prefer undo-
|
|||
(general-define-key
|
||||
"C-M-a" (lambda () (interactive) (org-capture nil "a")) ; make new anki card
|
||||
;; "C-M-d" 'swarsel-obsidian-daily ; open daily obsidian file and create if not exist
|
||||
;; "C-M-S" 'swarsel-anki-set-deck-and-notetype ; switch deck and notetye for new anki cards
|
||||
;; "C-M-S" 'swarsel-anki-set-deck-and-notetype ; switch deck and notetype for new anki cards
|
||||
;; "C-M-s" 'markdown-download-screenshot ; wrapper for org-download-screenshot
|
||||
"C-c d" 'duplicate-line ; duplicate line on CURSOR
|
||||
"C-M-j" 'consult-buffer
|
||||
"C-s" 'consult-line
|
||||
"M-o" 'avy-goto-char-timer
|
||||
"C-<f9>" 'my-python-shell-run
|
||||
)
|
||||
|
||||
|
|
@ -543,7 +588,8 @@ Here I set up the modeline with some information that I find useful. Specficiall
|
|||
:init (doom-modeline-mode)
|
||||
:custom
|
||||
((doom-modeline-height 22)
|
||||
(doom-modeline-indent-info t)))
|
||||
(doom-modeline-indent-info nil)
|
||||
(doom-modeline-buffer-encoding nil)))
|
||||
|
||||
;; Generally show line numbers
|
||||
(column-number-mode)
|
||||
|
|
@ -560,78 +606,82 @@ Soon I want to try out this new hot stuff - just at the moment there is too much
|
|||
|
||||
#+begin_src emacs-lisp
|
||||
|
||||
(use-package vertico
|
||||
:custom
|
||||
(vertico-scroll-margin 0)
|
||||
(vertico-count 10)
|
||||
(vertico-resize t)
|
||||
(vertico-cycle t)
|
||||
:init
|
||||
(vertico-mode)
|
||||
(vertico-mouse-mode))
|
||||
(setq read-buffer-completion-ignore-case t
|
||||
read-file-name-completion-ignore-case t
|
||||
completion-ignore-case t)
|
||||
|
||||
(use-package vertico-directory
|
||||
:ensure nil
|
||||
:after vertico
|
||||
:bind (:map vertico-map
|
||||
("RET" . vertico-directory-enter)
|
||||
("DEL" . vertico-directory-delete-char)
|
||||
("M-DEL" . vertico-directory-delete-word))
|
||||
;; Tidy shadowed file names
|
||||
:hook (rfn-eshadow-update-overlay . vertico-directory-tidy))
|
||||
|
||||
(use-package orderless
|
||||
:custom
|
||||
(completion-styles '(orderless flex basic))
|
||||
(completion-category-overrides '((file (styles . (partial-completion)))
|
||||
(eglot (styles orderless)))))
|
||||
|
||||
(use-package consult
|
||||
:config
|
||||
(setq consult-fontify-max-size 1024)
|
||||
:bind
|
||||
("C-x b" . consult-buffer)
|
||||
("C-c <C-m>" . consult-global-mark)
|
||||
("C-c C-a" . consult-org-agenda)
|
||||
("C-x O" . consult-outline)
|
||||
("M-g M-g" . consult-goto-line)
|
||||
("M-g i" . consult-imenu)
|
||||
("M-s s" . consult-line)
|
||||
("M-s M-s" . consult-line-multi))
|
||||
|
||||
(use-package embark
|
||||
:bind
|
||||
(("C-." . embark-act)
|
||||
("M-." . embark-dwim)
|
||||
("C-h B" . embark-bindings))
|
||||
:custom
|
||||
(prefix-help-command #'embark-prefix-help-command)
|
||||
(embark-quit-after-action '((t . nil)))
|
||||
:config
|
||||
(add-to-list 'display-buffer-alist
|
||||
'("\\`\\*Embark Collect \\(Live\\|Completions\\)\\*"
|
||||
nil
|
||||
(window-parameters (mode-line-format . none)))))
|
||||
|
||||
(use-package embark-consult
|
||||
:after (embark consult)
|
||||
:demand t ; only necessary if you have the hook below
|
||||
;; if you want to have consult previews as you move around an
|
||||
;; auto-updating embark collect buffer
|
||||
:hook
|
||||
(embark-collect-mode . consult-preview-at-point-mode))
|
||||
|
||||
(use-package marginalia
|
||||
:after vertico
|
||||
:init
|
||||
(marginalia-mode)
|
||||
(setq marginalia-annotators '(marginalia-annotators-heavy marginalia-annotators-light nil)))
|
||||
|
||||
(use-package nerd-icons-completion
|
||||
:after (marginalia nerd-icons)
|
||||
:hook (marginalia-mode . nerd-icons-completion-marginalia-setup)
|
||||
(use-package vertico
|
||||
:custom
|
||||
(vertico-scroll-margin 0)
|
||||
(vertico-count 10)
|
||||
(vertico-resize t)
|
||||
(vertico-cycle t)
|
||||
:init
|
||||
(nerd-icons-completion-mode))
|
||||
(vertico-mode)
|
||||
(vertico-mouse-mode))
|
||||
|
||||
(use-package vertico-directory
|
||||
:ensure nil
|
||||
:after vertico
|
||||
:bind (:map vertico-map
|
||||
("RET" . vertico-directory-enter)
|
||||
("DEL" . vertico-directory-delete-word)
|
||||
("M-DEL" . vertico-directory-delete-char))
|
||||
;; Tidy shadowed file names
|
||||
:hook (rfn-eshadow-update-overlay . vertico-directory-tidy))
|
||||
|
||||
(use-package orderless
|
||||
:custom
|
||||
(completion-styles '(orderless flex basic))
|
||||
(completion-category-overrides '((file (styles . (partial-completion)))
|
||||
(eglot (styles orderless)))))
|
||||
|
||||
(use-package consult
|
||||
:config
|
||||
(setq consult-fontify-max-size 1024)
|
||||
:bind
|
||||
("C-x b" . consult-buffer)
|
||||
("C-c <C-m>" . consult-global-mark)
|
||||
("C-c C-a" . consult-org-agenda)
|
||||
("C-x O" . consult-outline)
|
||||
("M-g M-g" . consult-goto-line)
|
||||
("M-g i" . consult-imenu)
|
||||
("M-s s" . consult-line)
|
||||
("M-s M-s" . consult-line-multi))
|
||||
|
||||
(use-package embark
|
||||
:bind
|
||||
(("C-." . embark-act)
|
||||
("M-." . embark-dwim)
|
||||
("C-h B" . embark-bindings))
|
||||
:custom
|
||||
(prefix-help-command #'embark-prefix-help-command)
|
||||
(embark-quit-after-action '((t . nil)))
|
||||
:config
|
||||
(add-to-list 'display-buffer-alist
|
||||
'("\\`\\*Embark Collect \\(Live\\|Completions\\)\\*"
|
||||
nil
|
||||
(window-parameters (mode-line-format . none)))))
|
||||
|
||||
(use-package embark-consult
|
||||
:after (embark consult)
|
||||
:demand t ; only necessary if you have the hook below
|
||||
;; if you want to have consult previews as you move around an
|
||||
;; auto-updating embark collect buffer
|
||||
:hook
|
||||
(embark-collect-mode . consult-preview-at-point-mode))
|
||||
|
||||
(use-package marginalia
|
||||
:after vertico
|
||||
:init
|
||||
(marginalia-mode)
|
||||
(setq marginalia-annotators '(marginalia-annotators-heavy marginalia-annotators-light nil)))
|
||||
|
||||
(use-package nerd-icons-completion
|
||||
:after (marginalia nerd-icons)
|
||||
:hook (marginalia-mode . nerd-icons-completion-marginalia-setup)
|
||||
:init
|
||||
(nerd-icons-completion-mode))
|
||||
|
||||
|
||||
#+end_src
|
||||
|
|
@ -1069,31 +1119,19 @@ Soon I want to try out this new hot stuff - just at the moment there is too much
|
|||
|
||||
#+begin_src emacs-lisp
|
||||
|
||||
;; (use-package auctex
|
||||
;; :ensure nil)
|
||||
(setq TeX-auto-save t)
|
||||
(setq TeX-save-query nil)
|
||||
(setq TeX-parse-self t)
|
||||
(setq-default TeX-master nil)
|
||||
(use-package auctex
|
||||
:ensure nil)
|
||||
(setq TeX-auto-save t)
|
||||
(setq TeX-save-query nil)
|
||||
(setq TeX-parse-self t)
|
||||
(setq-default TeX-master nil)
|
||||
|
||||
;; (add-hook 'LaTeX-mode-hook 'visual-line-mode)
|
||||
;; (add-hook 'LaTeX-mode-hook 'flyspell-mode)
|
||||
;; (add-hook 'LaTeX-mode-hook 'LaTeX-math-mode)
|
||||
(add-hook 'LaTeX-mode-hook 'visual-line-mode)
|
||||
(add-hook 'LaTeX-mode-hook 'flyspell-mode)
|
||||
(add-hook 'LaTeX-mode-hook 'LaTeX-math-mode)
|
||||
(add-hook 'LaTeX-mode-hook 'reftex-mode)
|
||||
|
||||
;; (add-hook 'LaTeX-mode-hook 'turn-on-reftex)
|
||||
;; (setq reftex-plug-into-AUCTeX t)
|
||||
|
||||
#+end_src
|
||||
|
||||
** TeX
|
||||
|
||||
#+begin_src emacs-lisp
|
||||
|
||||
(add-hook 'markdown-mode-hook
|
||||
(lambda ()
|
||||
(local-set-key (kbd "C-c C-x C-l") 'org-latex-preview)
|
||||
(local-set-key (kbd "C-c C-x C-u") 'markdown-toggle-url-hiding)
|
||||
))
|
||||
;; (setq reftex-plug-into-AUCTeX t)
|
||||
|
||||
#+end_src
|
||||
|
||||
|
|
@ -1297,6 +1335,18 @@ This is a section adapted from org-download to make some org-download functions
|
|||
|
||||
#+end_src
|
||||
|
||||
** LaTeX in Markdown
|
||||
|
||||
#+begin_src emacs-lisp
|
||||
|
||||
(add-hook 'markdown-mode-hook
|
||||
(lambda ()
|
||||
(local-set-key (kbd "C-c C-x C-l") 'org-latex-preview)
|
||||
(local-set-key (kbd "C-c C-x C-u") 'markdown-toggle-url-hiding)
|
||||
))
|
||||
|
||||
#+end_src
|
||||
|
||||
* Writing
|
||||
** Olivetti
|
||||
|
||||
|
|
@ -1411,6 +1461,24 @@ In order to update the language grammars, run the next command below.
|
|||
|
||||
#+end_src
|
||||
|
||||
** avy
|
||||
|
||||
#+begin_src emacs-lisp
|
||||
|
||||
(use-package avy
|
||||
:config
|
||||
(setq avy-all-windows 'all-frames))
|
||||
|
||||
#+end_src
|
||||
|
||||
** crdt (Collaborative Editing)
|
||||
|
||||
#+begin_src emacs-lisp
|
||||
|
||||
(use-package crdt)
|
||||
|
||||
#+end_src
|
||||
|
||||
** devdocs
|
||||
|
||||
#+begin_src emacs-lisp
|
||||
|
|
@ -1569,115 +1637,115 @@ Currently unused
|
|||
|
||||
#+begin_src emacs-lisp
|
||||
|
||||
;; (use-package corfu
|
||||
;; :custom
|
||||
;; (corfu-cycle t)
|
||||
;; :init
|
||||
;; (global-corfu-mode))
|
||||
;; (use-package corfu
|
||||
;; :custom
|
||||
;; (corfu-cycle t)
|
||||
;; :init
|
||||
;; (global-corfu-mode))
|
||||
|
||||
(use-package corfu
|
||||
:init
|
||||
(global-corfu-mode)
|
||||
(corfu-history-mode)
|
||||
(corfu-popupinfo-mode) ; Popup completion info
|
||||
:custom
|
||||
(corfu-auto t)
|
||||
(corfu-auto-prefix 3)
|
||||
(corfu-auto-delay 0.3)
|
||||
(corfu-cycle t)
|
||||
(corfu-quit-no-match 'separator)
|
||||
(corfu-separator ?\s)
|
||||
;; (corfu-quit-no-match t)
|
||||
(corfu-popupinfo-max-height 70)
|
||||
(corfu-popupinfo-delay '(0.5 . 0.2))
|
||||
;; (corfu-preview-current 'insert) ; insert previewed candidate
|
||||
(corfu-preselect 'prompt)
|
||||
(corfu-on-exact-match nil) ; Don't auto expand tempel snippets
|
||||
;; Optionally use TAB for cycling, default is `corfu-complete'.
|
||||
:bind (:map corfu-map
|
||||
("M-SPC" . corfu-insert-separator)
|
||||
("<return>" . swarsel/corfu-normal-return)
|
||||
;; ("C-<return>" . swarsel/corfu-complete)
|
||||
("S-<up>" . corfu-popupinfo-scroll-down)
|
||||
("S-<down>" . corfu-popupinfo-scroll-up)
|
||||
("C-<up>" . corfu-previous)
|
||||
("C-<down>" . corfu-next)
|
||||
("<up>" . swarsel/corfu-quit-and-up)
|
||||
("<down>" . swarsel/corfu-quit-and-down))
|
||||
(use-package corfu
|
||||
:init
|
||||
(global-corfu-mode)
|
||||
(corfu-history-mode)
|
||||
(corfu-popupinfo-mode) ; Popup completion info
|
||||
:custom
|
||||
(corfu-auto t)
|
||||
(corfu-auto-prefix 3)
|
||||
(corfu-auto-delay 0.3)
|
||||
(corfu-cycle t)
|
||||
(corfu-quit-no-match 'separator)
|
||||
(corfu-separator ?\s)
|
||||
;; (corfu-quit-no-match t)
|
||||
(corfu-popupinfo-max-height 70)
|
||||
(corfu-popupinfo-delay '(0.5 . 0.2))
|
||||
;; (corfu-preview-current 'insert) ; insert previewed candidate
|
||||
(corfu-preselect 'prompt)
|
||||
(corfu-on-exact-match nil) ; Don't auto expand tempel snippets
|
||||
;; Optionally use TAB for cycling, default is `corfu-complete'.
|
||||
:bind (:map corfu-map
|
||||
("M-SPC" . corfu-insert-separator)
|
||||
("<return>" . swarsel/corfu-normal-return)
|
||||
;; ("C-<return>" . swarsel/corfu-complete)
|
||||
("S-<up>" . corfu-popupinfo-scroll-down)
|
||||
("S-<down>" . corfu-popupinfo-scroll-up)
|
||||
("C-<up>" . corfu-previous)
|
||||
("C-<down>" . corfu-next)
|
||||
("<insert-state> <up>" . swarsel/corfu-quit-and-up)
|
||||
("<insert-state> <down>" . swarsel/corfu-quit-and-down))
|
||||
)
|
||||
|
||||
|
||||
;; dont disrupt file navigation with completions
|
||||
(defun swarsel/corfu-normal-return (&optional arg)
|
||||
(interactive)
|
||||
(corfu-quit)
|
||||
(newline)
|
||||
)
|
||||
|
||||
;; (defun swarsel/corfu-complete (&optional arg)
|
||||
;; (interactive)
|
||||
;; (corfu-complete)
|
||||
;; (newline)
|
||||
;; )
|
||||
|
||||
;; dont disrupt file navigation with completions
|
||||
(defun swarsel/corfu-normal-return (&optional arg)
|
||||
(interactive)
|
||||
(corfu-quit)
|
||||
(newline)
|
||||
)
|
||||
(defun swarsel/corfu-quit-and-up (&optional arg)
|
||||
(interactive)
|
||||
(corfu-quit)
|
||||
(evil-previous-visual-line))
|
||||
|
||||
;; (defun swarsel/corfu-complete (&optional arg)
|
||||
;; (interactive)
|
||||
;; (corfu-complete)
|
||||
;; (newline)
|
||||
;; )
|
||||
(defun swarsel/corfu-quit-and-down (&optional arg)
|
||||
(interactive)
|
||||
(corfu-quit)
|
||||
(evil-next-visual-line))
|
||||
|
||||
(defun swarsel/corfu-quit-and-up (&optional arg)
|
||||
(interactive)
|
||||
(corfu-quit)
|
||||
(evil-previous-visual-line))
|
||||
(use-package nerd-icons-corfu)
|
||||
|
||||
(defun swarsel/corfu-quit-and-down (&optional arg)
|
||||
(interactive)
|
||||
(corfu-quit)
|
||||
(evil-next-visual-line))
|
||||
(add-to-list 'corfu-margin-formatters #'nerd-icons-corfu-formatter)
|
||||
|
||||
(use-package nerd-icons-corfu)
|
||||
(setq nerd-icons-corfu-mapping
|
||||
'((array :style "cod" :icon "symbol_array" :face font-lock-type-face)
|
||||
(boolean :style "cod" :icon "symbol_boolean" :face font-lock-builtin-face)
|
||||
;; ...
|
||||
(t :style "cod" :icon "code" :face font-lock-warning-face)))
|
||||
|
||||
(add-to-list 'corfu-margin-formatters #'nerd-icons-corfu-formatter)
|
||||
|
||||
(setq nerd-icons-corfu-mapping
|
||||
'((array :style "cod" :icon "symbol_array" :face font-lock-type-face)
|
||||
(boolean :style "cod" :icon "symbol_boolean" :face font-lock-builtin-face)
|
||||
;; ...
|
||||
(t :style "cod" :icon "code" :face font-lock-warning-face)))
|
||||
|
||||
(use-package cape
|
||||
;; Bind dedicated completion commands
|
||||
;; Alternative prefix keys: C-c p, M-p, M-+, ...
|
||||
;; :bind (("C-c p p" . completion-at-point) ;; capf
|
||||
;; ("C-c p t" . complete-tag) ;; etags
|
||||
;; ("C-c p d" . cape-dabbrev) ;; or dabbrev-completion
|
||||
;; ("C-c p h" . cape-history)
|
||||
;; ("C-c p f" . cape-file)
|
||||
;; ("C-c p k" . cape-keyword)
|
||||
;; ("C-c p s" . cape-elisp-symbol)
|
||||
;; ("C-c p e" . cape-elisp-block)
|
||||
;; ("C-c p a" . cape-abbrev)
|
||||
;; ("C-c p l" . cape-line)
|
||||
;; ("C-c p w" . cape-dict)
|
||||
;; ("C-c p :" . cape-emoji)
|
||||
;; ("C-c p \\" . cape-tex)
|
||||
;; ("C-c p _" . cape-tex)
|
||||
;; ("C-c p ^" . cape-tex)
|
||||
;; ("C-c p &" . cape-sgml)
|
||||
;; ("C-c p r" . cape-rfc1345))
|
||||
:init
|
||||
;; Add to the global default value of `completion-at-point-functions' which is
|
||||
;; used by `completion-at-point'. The order of the functions matters, the
|
||||
;; first function returning a result wins. Note that the list of buffer-local
|
||||
;; completion functions takes precedence over the global list.
|
||||
(add-to-list 'completion-at-point-functions #'cape-dabbrev)
|
||||
(add-to-list 'completion-at-point-functions #'cape-file)
|
||||
(add-to-list 'completion-at-point-functions #'cape-elisp-block)
|
||||
;; (add-to-list 'completion-at-point-functions #'cape-history)
|
||||
;; (add-to-list 'completion-at-point-functions #'cape-keyword)
|
||||
;; (add-to-list 'completion-at-point-functions #'cape-tex)
|
||||
;; (add-to-list 'completion-at-point-functions #'cape-sgml)
|
||||
;; (add-to-list 'completion-at-point-functions #'cape-rfc1345)
|
||||
;; (add-to-list 'completion-at-point-functions #'cape-abbrev)
|
||||
;; (add-to-list 'completion-at-point-functions #'cape-dict)
|
||||
(add-to-list 'completion-at-point-functions #'cape-elisp-symbol)
|
||||
;; (add-to-list 'completion-at-point-functions #'cape-line)
|
||||
)
|
||||
(use-package cape
|
||||
;; Bind dedicated completion commands
|
||||
;; Alternative prefix keys: C-c p, M-p, M-+, ...
|
||||
:bind
|
||||
("C-c p p" . completion-at-point) ;; capf
|
||||
("C-c p t" . complete-tag) ;; etags
|
||||
("C-c p d" . cape-dabbrev) ;; or dabbrev-completion
|
||||
("C-c p h" . cape-history)
|
||||
("C-c p f" . cape-file)
|
||||
("C-c p k" . cape-keyword)
|
||||
("C-c p s" . cape-elisp-symbol)
|
||||
("C-c p e" . cape-elisp-block)
|
||||
("C-c p a" . cape-abbrev)
|
||||
("C-c p l" . cape-line)
|
||||
("C-c p w" . cape-dict)
|
||||
("C-c p :" . cape-emoji)
|
||||
("C-c p \\" . cape-tex)
|
||||
("C-c p _" . cape-tex)
|
||||
("C-c p ^" . cape-tex)
|
||||
("C-c p &" . cape-sgml)
|
||||
("C-c p r" . cape-rfc1345)
|
||||
;; Add to the global default value of `completion-at-point-functions' which is
|
||||
;; used by `completion-at-point'. The order of the functions matters, the
|
||||
;; first function returning a result wins. Note that the list of buffer-local
|
||||
;; completion functions takes precedence over the global list.
|
||||
;; (add-to-list 'completion-at-point-functions #'cape-dabbrev)
|
||||
;; (add-to-list 'completion-at-point-functions #'cape-file)
|
||||
;; (add-to-list 'completion-at-point-functions #'cape-elisp-block)
|
||||
;; (add-to-list 'completion-at-point-functions #'cape-history)
|
||||
;; (add-to-list 'completion-at-point-functions #'cape-keyword)
|
||||
;; (add-to-list 'completion-at-point-functions #'cape-tex)
|
||||
;; (add-to-list 'completion-at-point-functions #'cape-sgml)
|
||||
;; (add-to-list 'completion-at-point-functions #'cape-rfc1345)
|
||||
;; (add-to-list 'completion-at-point-functions #'cape-abbrev)
|
||||
;; (add-to-list 'completion-at-point-functions #'cape-dict)
|
||||
;; (add-to-list 'completion-at-point-functions #'cape-elisp-symbol)
|
||||
;; (add-to-list 'completion-at-point-functions #'cape-line)
|
||||
)
|
||||
|
||||
#+end_src
|
||||
|
||||
|
|
@ -1809,6 +1877,19 @@ Currently unused
|
|||
|
||||
#+end_src
|
||||
|
||||
*** diff-hl
|
||||
#+begin_src emacs-lisp
|
||||
|
||||
(use-package diff-hl
|
||||
:hook
|
||||
((prog-mode
|
||||
org-mode) . diff-hl-mode)
|
||||
:init
|
||||
(diff-fl-flydiff-mode)
|
||||
(diff-hl-margin-mode)
|
||||
(diff-hl-show-hunk-mouse-mode))
|
||||
|
||||
#+end_src
|
||||
*** Commenting
|
||||
|
||||
#+begin_src emacs-lisp
|
||||
|
|
@ -1852,7 +1933,7 @@ The following block is 100% stolen from Dominik :P
|
|||
("e" . "\\epsilon")
|
||||
("z" . "\\zeta")
|
||||
("h" . "\\eta")
|
||||
("t" . "\\theta")
|
||||
("th" . "\\theta")
|
||||
("i" . "\\iota")
|
||||
("k" . "\\kappa")
|
||||
("l" . "\\lambda")
|
||||
|
|
@ -2051,30 +2132,33 @@ The following block is 100% stolen from Dominik :P
|
|||
|
||||
#+begin_src emacs-lisp
|
||||
|
||||
(use-package eglot
|
||||
:ensure nil
|
||||
:hook
|
||||
((python-mode
|
||||
c-mode
|
||||
c++-mode
|
||||
) . (lambda () (progn
|
||||
(eglot-ensure)
|
||||
(add-hook 'before-save-hook 'eglot-format nil 'local))))
|
||||
:custom
|
||||
(eldoc-echo-area-use-multiline-p nil)
|
||||
(completion-category-defaults nil)
|
||||
:config
|
||||
;; (push '(rustic-ts-mode . eglot-rust-analyzer) eglot-server-programs)
|
||||
(push '(rustic-mode . eglot-rust-analyzer) eglot-server-programs)
|
||||
(add-to-list 'eglot-server-programs '((rust-mode) . (eglot-rust-analyzer "rust-analyzer")))
|
||||
;; (add-to-list 'eglot-server-programs '((python-mode) . ("pylsp")))
|
||||
;; (add-to-list 'eglot-server-programs '((c-mode) . ("clangd")))
|
||||
:bind (:map eglot-mode-map
|
||||
("M-(" . flymake-goto-next-error)
|
||||
("C-c ," . eglot-code-actions)))
|
||||
(use-package eglot
|
||||
:ensure nil
|
||||
:hook
|
||||
((python-mode
|
||||
c-mode
|
||||
c++-mode
|
||||
tex-mode
|
||||
) . (lambda () (progn
|
||||
(eglot-ensure)
|
||||
(add-hook 'before-save-hook 'eglot-format nil 'local))))
|
||||
:custom
|
||||
(eldoc-echo-area-use-multiline-p nil)
|
||||
(completion-category-defaults nil)
|
||||
:config
|
||||
;; (push '(rustic-ts-mode . eglot-rust-analyzer) eglot-server-programs)
|
||||
(push '(rustic-mode . eglot-rust-analyzer) eglot-server-programs)
|
||||
(add-to-list 'eglot-server-programs '((rust-mode) . (eglot-rust-analyzer "rust-analyzer")))
|
||||
;; (add-to-list 'eglot-server-programs '((python-mode) . ("pylsp")))
|
||||
;; (add-to-list 'eglot-server-programs '((c-mode) . ("clangd")))
|
||||
:bind (:map eglot-mode-map
|
||||
("M-(" . flymake-goto-next-error)
|
||||
("C-c ," . eglot-code-actions)))
|
||||
|
||||
(use-package breadcrumb
|
||||
:config (breadcrumb-mode))
|
||||
(defalias 'start-lsp-server #'eglot)
|
||||
|
||||
(use-package breadcrumb
|
||||
:config (breadcrumb-mode))
|
||||
|
||||
|
||||
#+end_src
|
||||
|
|
@ -2350,43 +2434,45 @@ The following block is 100% stolen from Dominik :P
|
|||
|
||||
#+begin_src emacs-lisp
|
||||
|
||||
(use-package mu4e
|
||||
:ensure nil
|
||||
;; :load-path "/usr/share/emacs/site-lisp/mu4e/"
|
||||
;;:defer 20 ; Wait until 20 seconds after startup
|
||||
:config
|
||||
(use-package mu4e
|
||||
:ensure nil
|
||||
;; :load-path "/usr/share/emacs/site-lisp/mu4e/"
|
||||
;;:defer 20 ; Wait until 20 seconds after startup
|
||||
:config
|
||||
|
||||
;; This is set to 't' to avoid mail syncing issues when using mbsync
|
||||
(setq send-mail-function 'sendmail-send-it)
|
||||
(setq mu4e-change-filenames-when-moving t)
|
||||
(setq mu4e-mu-binary (executable-find "mu"))
|
||||
;; This is set to 't' to avoid mail syncing issues when using mbsync
|
||||
(setq send-mail-function 'sendmail-send-it)
|
||||
(setq mu4e-change-filenames-when-moving t)
|
||||
(setq mu4e-mu-binary (executable-find "mu"))
|
||||
|
||||
(setq mu4e-update-interval 180)
|
||||
(setq mu4e-get-mail-command "mbsync -a")
|
||||
(setq mu4e-maildir "~/Mail")
|
||||
(setq mu4e-update-interval 180)
|
||||
(setq mu4e-get-mail-command "mbsync -a")
|
||||
(setq mu4e-maildir "~/Mail")
|
||||
|
||||
;; enable inline images
|
||||
(setq mu4e-view-show-images t)
|
||||
;; use imagemagick, if available
|
||||
(when (fboundp 'imagemagick-register-types)
|
||||
(imagemagick-register-types))
|
||||
;; enable inline images
|
||||
(setq mu4e-view-show-images t)
|
||||
;; use imagemagick, if available
|
||||
(when (fboundp 'imagemagick-register-types)
|
||||
(imagemagick-register-types))
|
||||
|
||||
(setq mu4e-drafts-folder "/Drafts")
|
||||
(setq mu4e-sent-folder "/Sent Mail")
|
||||
(setq mu4e-refile-folder "/All Mail")
|
||||
(setq mu4e-trash-folder "/Trash")
|
||||
(setq mu4e-drafts-folder "/Drafts")
|
||||
(setq mu4e-sent-folder "/Sent Mail")
|
||||
(setq mu4e-refile-folder "/All Mail")
|
||||
(setq mu4e-trash-folder "/Trash")
|
||||
|
||||
(setq mu4e-maildir-shortcuts
|
||||
'((:maildir "/leon/Inbox" :key ?1)
|
||||
(:maildir "/nautilus/Inbox" :key ?2)
|
||||
(:maildir "/mrswarsel/Inbox" :key ?3)
|
||||
(:maildir "/Sent Mail" :key ?s)
|
||||
(:maildir "/Trash" :key ?t)
|
||||
(:maildir "/Drafts" :key ?d)
|
||||
(:maildir "/All Mail" :key ?a))))
|
||||
(setq mu4e-maildir-shortcuts
|
||||
'((:maildir "/leon/Inbox" :key ?1)
|
||||
(:maildir "/nautilus/Inbox" :key ?2)
|
||||
(:maildir "/mrswarsel/Inbox" :key ?3)
|
||||
(:maildir "/Sent Mail" :key ?s)
|
||||
(:maildir "/Trash" :key ?t)
|
||||
(:maildir "/Drafts" :key ?d)
|
||||
(:maildir "/All Mail" :key ?a))))
|
||||
|
||||
(setq user-mail-address "leon.schwarzaeugl@gmail.com"
|
||||
user-full-name "Leon Schwarzäugl")
|
||||
(setq user-mail-address "leon.schwarzaeugl@gmail.com"
|
||||
user-full-name "Leon Schwarzäugl")
|
||||
|
||||
(setq mu4e-hide-index-messages t)
|
||||
|
||||
#+end_src
|
||||
|
||||
|
|
@ -2491,6 +2577,15 @@ Yep, none currently.
|
|||
dashboard-startup-banner "~/.dotfiles/wallpaper/swarsel.png"
|
||||
dashboard-projects-backend 'projectile
|
||||
dashboard-set-navigator t
|
||||
dashboard-startupify-list '(dashboard-insert-banner
|
||||
dashboard-insert-newline
|
||||
dashboard-insert-banner-title
|
||||
dashboard-insert-newline
|
||||
dashboard-insert-navigator
|
||||
dashboard-insert-newline
|
||||
dashboard-insert-init-info
|
||||
dashboard-insert-items
|
||||
)
|
||||
dashboard-navigator-buttons
|
||||
`(;; line1
|
||||
((,""
|
||||
|
|
@ -2522,7 +2617,7 @@ Yep, none currently.
|
|||
(lambda (&rest _) (browse-url "swarsel.win")))
|
||||
)
|
||||
)))
|
||||
(setq dashboard-projects-switch-function 'counsel-projectile-switch-project-by-name)
|
||||
(setq dashboard-projects-switch-function 'project-switch-project)
|
||||
|
||||
|
||||
#+end_src
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue