diff --git a/core/core-packages.el b/core/core-packages.el
index a3244587d..0196fc7a7 100644
--- a/core/core-packages.el
+++ b/core/core-packages.el
@@ -234,10 +234,6 @@ processed."
           nil-value)
       plist)))
 
-(defun doom-package-build-time (package)
-  "TODO"
-  (car (gethash (symbol-name package) straight--build-cache)))
-
 (defun doom-package-dependencies (package &optional recursive _noerror)
   "Return a list of dependencies for a package."
   (let ((deps (nth 1 (gethash (symbol-name package) straight--build-cache))))
@@ -293,18 +289,6 @@ installed."
         ((locate-library (symbol-name package))
          'other)))
 
-(defun doom-package-changed-recipe-p (name)
-  "Return t if a package named NAME (a symbol) has a different recipe than it
-was installed with."
-  (cl-check-type name symbol)
-  ;; TODO
-  ;; (when (doom-package-installed-p name)
-  ;;   (when-let* ((doom-recipe (assq name doom-packages))
-  ;;               (install-recipe (doom-package-recipe)))
-  ;;     (not (equal (cdr quelpa-recipe)
-  ;;                 (cdr (plist-get (cdr doom-recipe) :recipe))))))
-  )
-
 
 ;;; Package getters
 (defun doom--read-packages (file &optional noeval noerror)
@@ -380,21 +364,6 @@ ones."
                            nil 'remove #'equal)
                 (unless unpin pin)))))))
 
-(defun doom-package-unpinned-list ()
-  "Return an alist mapping package names (strings) to pinned commits (strings)."
-  (let (alist)
-    (dolist (package doom-packages alist)
-      (cl-destructuring-bind
-          (_ &key recipe disable ignore pin unpin &allow-other-keys)
-          package
-        (when (and (not ignore)
-                   (not disable)
-                   (or unpin
-                       (and (plist-member recipe :pin)
-                            (null pin))))
-          (cl-pushnew (doom-package-recipe-repo (car package)) alist
-                      :test #'equal))))))
-
 (defun doom-package-recipe-list ()
   "Return straight recipes for non-builtin packages with a local-repo."
   (let (recipes)
@@ -406,16 +375,6 @@ ones."
           (push recipe recipes))))
     (nreverse recipes)))
 
-(defun doom-package-state-list ()
-  "TODO"
-  (let (alist)
-    (dolist (recipe (hash-table-values straight--repo-cache) alist)
-      (cl-destructuring-bind (&key local-repo type &allow-other-keys)
-          recipe
-        (when (and local-repo (not (eq type 'built-in)))
-          (setf (alist-get local-repo alist nil nil #'equal)
-                (straight-vc-get-commit type local-repo)))))))
-
 
 ;;
 ;;; Module package macros