Seq and Eldoc version issue workaround

This commit is contained in:
mir 2024-01-23 07:50:17 -09:00
parent d3a2027752
commit 23f4cf5205

View File

@ -20,6 +20,33 @@
(global-prettify-symbols-mode 1)
(auto-insert-mode))
;; seq version workaround, see https://www.reddit.com/r/emacs/comments/1937vaz/emacs_291_on_windows_install_magit_requires_seq/?rdt=48529
(defun +elpaca-unload-seq (e)
(and (featurep 'seq) (unload-feature 'seq t))
(elpaca--continue-build e))
(defun +elpaca-seq-build-steps ()
(append (butlast (if (file-exists-p (expand-file-name "seq" elpaca-builds-directory))
elpaca--pre-built-steps elpaca-build-steps))
(list '+elpaca-unload-seq 'elpaca--activate-package)))
(use-package seq :elpaca `(seq :build ,(+elpaca-seq-build-steps)))
;; eldoc version workarounds...
(defun global-eldoc-mode (&rest args)
"Placeholder function. Do nothing and return nil."
nil)
(defun +elpaca-unload-eldoc (e)
(and (featurep 'eldoc) (unload-feature 'eldoc t))
(elpaca--continue-build e))
(defun +elpaca-eldoc-build-steps ()
(append (butlast (if (file-exists-p (expand-file-name "eldoc" elpaca-builds-directory))
elpaca--pre-built-steps elpaca-build-steps))
(list '+elpaca-unload-eldoc 'elpaca--activate-package)))
(use-package eldoc
:elpaca `(eldoc :build ,(+elpaca-eldoc-build-steps))
:init
)
(elpaca-wait)
;; (use-package no-littering) ;a bad start, and we need more
(use-package epg
@ -85,6 +112,7 @@
(elpaca-wait)
(use-package eldoc-box
:after eldoc
:diminish (eldoc-mode eldoc-box-hover-at-point-mode)
:hook (prog-mode . eldoc-box-hover-at-point-mode))
@ -790,6 +818,7 @@ Return nil if DIR is not in a hugo project at all."
;; epic drop-down completion
(use-package corfu
:after eldoc
:elpaca (:files (:defaults "extensions/*.el"))
;; :if (display-graphic-p) ; breaks in emacsclient
:custom
@ -851,6 +880,7 @@ Return nil if DIR is not in a hugo project at all."
(corfu-terminal-mode +1)))
(use-package magit
:after seq
:commands (madots magit-status magit)
:hook (magit-mode . turn-off-line-numbers)
:custom (vc-follow-symlinks t)
@ -886,9 +916,10 @@ Return nil if DIR is not in a hugo project at all."
(setq magit-bury-buffer-function #'kill-buffer-and-window)
(magit-status)
(run-with-timer 5 3 #'madots--cleanup)))
(use-package magit-todos
:after magit
:init (magit-todos-mode))
;; ;; broken bc of hl-todo version issue
;; (use-package magit-todos
;; :after magit
;; :init (magit-todos-mode))
(use-package blamer
:elpaca (:host github :repo "artawower/blamer.el")
:after magit