# HG changeset patch
# User Richard Westhaver <ellis@rwest.io>
# Date 1715652624 14400
# Node ID 3bce51a08b5cee67f8857111f50ec895d80e760b
# Parent  724218ecea4b4b6a6907cc16e07c0e458c5931a2
bufixes

diff -r 724218ecea4b -r 3bce51a08b5c lisp/bin/homer.lisp
--- a/lisp/bin/homer.lisp	Mon May 13 22:03:51 2024 -0400
+++ b/lisp/bin/homer.lisp	Mon May 13 22:10:24 2024 -0400
@@ -62,7 +62,7 @@
     (let ((form (file-read-forms file)))
       (setq *home-config* (load-ast (make-instance 'home-config :ast form :path file :id (sxhash form))))
       (with-slots (src) *home-config*
-        (if src
+        (if (info! src)
             (setf src (pathname src))
             (setf src (pathname (sb-posix:getenv "HOMER"))))))))