summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rwxr-xr-xbin/tissue13
1 files changed, 13 insertions, 0 deletions
diff --git a/bin/tissue b/bin/tissue
index aaaa122..948460d 100755
--- a/bin/tissue
+++ b/bin/tissue
@@ -406,6 +406,13 @@ HOSTNAME."
(call-with-temporary-directory
(lambda (temporary-repository-clone)
(clone (git-top-level) temporary-repository-clone)
+ ;; Add the top level of the git repository to the
+ ;; load path since there may be user-written
+ ;; modules in the repository.
+ ;; TODO: Though not strictly required, it would
+ ;; be better to remove the added load path once
+ ;; done.
+ (add-to-load-path temporary-repository-clone)
;; Index.
(unless (file-exists? "xapian")
(mkdir "xapian"))
@@ -482,6 +489,12 @@ Pull latest from upstream repositories.
(display (condition-message c) (current-error-port))
(newline (current-error-port))
(exit #f)))
+ ;; Add the top level of the git repository to the load path since
+ ;; there may be user-written modules in the repository.
+ (match args
+ ((_ (or "repl" "web-dev") _ ...)
+ (add-to-load-path (git-top-level)))
+ (_ #t))
(match args
((_ (or "-h" "--help"))
(print-usage))