From 140a490ad95b6157251c1eaaeb1b808983f088a2 Mon Sep 17 00:00:00 2001
From: Adam Goldsmith <adam@adamgoldsmith.name>
Date: Fri, 12 Jan 2024 00:18:32 -0500
Subject: [PATCH] Replace quelpa with `vc-use-package`

---
 .emacs.d/init.el | 17 +++++++----------
 1 file changed, 7 insertions(+), 10 deletions(-)

diff --git a/.emacs.d/init.el b/.emacs.d/init.el
index 2816edb..c940f39 100644
--- a/.emacs.d/init.el
+++ b/.emacs.d/init.el
@@ -37,11 +37,8 @@
   :config
   (setq use-package-check-before-init t
         use-package-always-defer t))
-(use-package quelpa :ensure :demand
-  :init
-  (setq quelpa-update-melpa-p nil)
-  :config
-  (use-package quelpa-use-package :ensure :demand))
+(unless (package-installed-p 'vc-use-package)
+  (package-vc-install "https://github.com/slotThe/vc-use-package"))
 
 ;;;; not sure where to put this
 (defun open-thunar-in-current-directory ()
@@ -553,7 +550,7 @@
   (add-to-list 'popwin:special-display-config '(help-mode :stick t)))
 
 (use-package dired+
-  :quelpa (dired+ :fetcher github :repo "emacsmirror/dired-plus")
+  :vc (:fetcher github :repo emacsmirror/dired-plus)
   :init
   (setq diredp-hide-details-initially-flag nil)
   :config
@@ -658,7 +655,7 @@
     (setq lsp-java-save-action-organize-imports nil)))
 
 (use-package indent-bars
-  :quelpa (indent-bars :fetcher github :repo "jdtsmith/indent-bars")
+  :vc (:fetcher github :repo jdtsmith/indent-bars)
   :custom
   (indent-bars-treesit-support t)
   (indent-bars-no-descend-string t)
@@ -925,7 +922,7 @@
 
 (use-package nm
   :if (executable-find "notmuch")
-  :quelpa (nm :fetcher github :repo "ad1217/nevermore")
+  :vc (:fetcher github :repo ad1217/nevermore)
   :bind (:map nm-mode-map
               ("n" . nm-read)
               ("s" . nm-spam)
@@ -1033,7 +1030,7 @@
 
 (use-package org-lookup-dnd
   :if (file-exists-p "~/Documents/DnD/dnd-phb-5e-index/indexes.org")
-  :quelpa (org-lookup-dnd :fetcher gitlab :repo "ad1217/org-lookup-dnd" :branch "no-pdfview")
+  :vc (:fetcher gitlab :repo ad1217/org-lookup-dnd :rev no-pdfview)
   :bind (:map org-mode-map ("C-c d" . org-lookup-dnd-at-point))
   :config
   (setq org-lookup-dnd-chose 'org-lookup-dnd-chose-ivy
@@ -1108,7 +1105,7 @@
   (apheleia-global-mode t))
 
 (use-package smali-mode
-  :quelpa (smali-mode :fetcher github :repo "strazzere/Emacs-Smali")
+  :vc (:fetcher github :repo strazzere/Emacs-Smali)
   :if (package-installed-p 'smali-mode)
   :autoload smali-mode
   :mode "\\.smali\\'")