X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/sod/blobdiff_plain/7679d07b097669fe8d57b453619635a89cc4afef..refs/heads/mdw/progfmt:/src/asdf-hack.lisp.in

diff --git a/src/asdf-hack.lisp.in b/src/asdf-hack.lisp.in
index 6358dab..54fa75f 100644
--- a/src/asdf-hack.lisp.in
+++ b/src/asdf-hack.lisp.in
@@ -2,5 +2,5 @@
 
 (declaim (optimize debug))
 (asdf:initialize-source-registry
- `(:source-registry (:directory ,*load-pathname*)
+ `(:source-registry (:directory ,*load-truename*)
 		    :inherit-configuration))