From abade3d9876d7084000e8d46ddf976ebc602bdad Mon Sep 17 00:00:00 2001 From: Benson Chu Date: Sun, 16 Oct 2022 13:33:47 -0500 Subject: [PATCH] Quelpa rework for ti --- config-min.org | 7 +++---- lisp/use-exwm.el | 2 +- 2 files changed, 4 insertions(+), 5 deletions(-) diff --git a/config-min.org b/config-min.org index a0b9f3b..2235562 100644 --- a/config-min.org +++ b/config-min.org @@ -472,16 +472,15 @@ (define-key emacs-lisp-mode-map (kbd "C-c C-e") 'my/eval-and-replace) ;; Use cider's eval expression - (let ((quelpa-build-default-files-spec + (let ((fetcher (if my-ec/at-ti "github" "github-ssh")) + (quelpa-build-default-files-spec '("*.el" "lisp/*.el" "dir" "*.info" "*.texi" "*.texinfo" "doc/dir" "doc/*.info" "doc/*.texi" "doc/*.texinfo" "docs/dir" "docs/*.info" "docs/*.texi" "docs/*.texinfo" (:exclude ".dir-locals.el" "lisp/.dir-locals.el")))) - (use-package cider - :ensure nil - :quelpa (cider :fetcher "github-ssh" :repo "pestctrl/cider" :branch "consecutive-overlays"))) + (quelpa cider :repo "pestctrl/cider" :branch "consecutive-overlays" :fetcher fetcher)) (autoload 'cider--make-result-overlay "cider-overlays") (defun endless/eval-overlay (value point) diff --git a/lisp/use-exwm.el b/lisp/use-exwm.el index 5bc182a..98fa0ce 100644 --- a/lisp/use-exwm.el +++ b/lisp/use-exwm.el @@ -32,7 +32,7 @@ `(use-package exwm :ensure nil :defer t - :quelpa (exwm :fetcher "github-ssh" :repo "pestctrl/exwm") + :quelpa (exwm :fetcher ,(if my-ec/at-ti "github" "github-ssh") :repo "pestctrl/exwm") ,@body)) (provide 'use-exwm)