diff --git a/ChangeLog b/ChangeLog
index b1a7f6ad5b..c63c7baefd 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2000-07-12  Dave Peticolas  <dave@krondo.com>
+
+	* src/scm/bootstrap.scm.in: add HOME/.gnucash to scm search path.
+
 2000-07-04  Dave Peticolas  <dave@krondo.com>
 
 	* src/scm/bootstrap.scm.in: bump up the stack limit
diff --git a/src/scm/bootstrap.scm.in b/src/scm/bootstrap.scm.in
index 39ecd7a768..77d3947e4e 100644
--- a/src/scm/bootstrap.scm.in
+++ b/src/scm/bootstrap.scm.in
@@ -161,12 +161,12 @@
 string and 'directories' must be a list of strings."
 
   (gnc:debug "gnc:find-in-directories looking for " file " in " directories)
-  
+
   (do ((rest directories (cdr rest))
        (finished? #f)
        (result #f))
       ((or (null? rest) finished?) result)
-    
+
     (let ((file-name (string-append (car rest) "/" file)))
       (gnc:debug "  checking for " file-name)
       (if (access? file-name F_OK)
@@ -211,7 +211,8 @@ file in all of the directories specified by gnc:*load-path*."
                  ((symbol? item)
                   (case item
                     ((default)
-                     (list 
+                     (list
+                      (string-append (getenv "HOME") "/.gnucash")
                       (string-append (getenv "HOME") "/.gnucash/scm")
                       (string-append gnc:_share-dir-default_ "/scm")))
                     ((current)