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