From 99f0625905e9b893037291bb97137ee3ed531de5 Mon Sep 17 00:00:00 2001
From: Nathan McCarty <thatonelutenist@stranger.systems>
Date: Tue, 21 Jan 2025 21:41:28 -0500
Subject: [PATCH] Slightly smarter program location

---
 blog | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/blog b/blog
index d505cb7..10e1c46 100755
--- a/blog
+++ b/blog
@@ -8,7 +8,7 @@ my %*SUB-MAIN-OPTS =
     :bundling,
 ;
 
-my IO::Path:D $blog-dir = $*PROGRAM.dirname.IO.dirname.IO;
+my IO::Path:D $blog-dir = $*PROGRAM.parent;
 #= The directory this script is located in
 
 #| Load the database from the provided file