Use env variable REPO_PATH.

1 files changed, 3 insertions, 3 deletions

diff --git a/web/view/markdown.scm b/web/view/markdown.scm
index 4f085bd..1220898 100644
--- a/web/view/markdown.scm
+++ b/web/view/markdown.scm
@@ -21,17 +21,16 @@
 	    markdown-github->sxml
 	    fetch-file
 	    fetch-raw-file
-	    commit-file)
+	    commit-file
+	    is-repo?)
   )
 
 
-
 (define (markdown-file->sxml fn)
   "Parse a local file"
   (commonmark->sxml
    (call-with-input-file fn
      get-string-all)))
-
 ;; --- fetch github style URLs
 
 (define (fetch-raw-file url)
@@ -91,6 +90,7 @@
     commit-sha))
 
 (define* (commit-file repo file-path content commit-message username email #:optional (prev-commit ""))
+
   (if (string=? prev-commit (get-latest-commit-sha1 repo))
       #t
       (throw 'system-error (format #f "Commits do no match.Please pull in latest  changes for current * ~a * and prev * ~a * "