From 4eaa44b4f167ace57287cceb1a0ec90c2b3b92d4 Mon Sep 17 00:00:00 2001
From: Pagwin <dev@pagwin.xyz>
Date: Mon, 23 Feb 2026 21:59:20 -0500
Subject: [PATCH] handled leading slash

---
 src/Utilities/FilePath.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/Utilities/FilePath.hs b/src/Utilities/FilePath.hs
index 3489414..43111e7 100644
--- a/src/Utilities/FilePath.hs
+++ b/src/Utilities/FilePath.hs
@@ -31,7 +31,7 @@ res_path_handle :: String -> T.Text
 res_path_handle = T.pack . yeetTop
 
 yeetTop :: FilePath -> FilePath
-yeetTop path = new_dir </> filename
+yeetTop path = '/' : new_dir </> filename
   where
     new_dir = concat $ drop 1 $ FP.splitPath $ FP.takeDirectory path
     filename = FP.takeFileName path