diff --git a/core/test/core-projects.el b/core/test/core-projects.el
new file mode 100644
index 000000000..fab6c89b8
--- /dev/null
+++ b/core/test/core-projects.el
@@ -0,0 +1,35 @@
+;; -*- no-byte-compile: t; -*-
+;;; ../core/test/core-projects.el
+
+(projectile-mode +1)
+
+(def-test! project-p
+  (let ((default-directory doom-emacs-dir))
+    (should (doom-project-p)))
+  (let ((default-directory (expand-file-name "~")))
+    (should-not (doom-project-p))))
+
+(def-test! project-root
+  ;; Should resolve to project root
+  (let ((default-directory doom-core-dir))
+    (should (equal (doom-project-root) doom-emacs-dir)))
+  ;; Should resolve to `default-directory' if not a project
+  (let ((default-directory (expand-file-name "~")))
+    (should (equal (doom-project-root) default-directory))))
+
+(def-test! project-expand
+  (let ((default-directory doom-core-dir))
+    (should (equal (doom-project-expand "init.el")
+                   (expand-file-name "init.el" (doom-project-root))))))
+
+(def-test! project-has!
+  (let ((default-directory doom-core-dir))
+    ;; Resolve from project root
+    (should (doom-project-has! "init.el"))
+    ;; Chained file checks
+    (should (doom-project-has! (and "init.el" "LICENSE")))
+    (should (doom-project-has! (or "init.el" "does-not-exist")))
+    (should (doom-project-has! (and "init.el" (or "LICENSE" "does-not-exist"))))
+    ;; Should resolve relative paths from `default-directory'
+    (should (doom-project-has! (and "./core.el" "../init.el")))))
+