diff options
-rw-r--r-- | web/view/markdown.scm | 7 |
1 files changed, 1 insertions, 6 deletions
diff --git a/web/view/markdown.scm b/web/view/markdown.scm index b350a1b..0a408b3 100644 --- a/web/view/markdown.scm +++ b/web/view/markdown.scm @@ -15,7 +15,6 @@ #:use-module (web request) #:use-module (web sxml) #:use-module (commonmark) - #:export (markdown-file->sxml markdown-github->sxml fetch-file fetch-raw-file commit-file)) @@ -26,11 +25,7 @@ (define (fetch-raw-file url) (receive (response-status response-body) - (http-request url) response-body)) - -;; https://github.com/genenetwork/gn-docs/master/general/brand/aging/home.md -;; https://raw.githubusercontent.com/genenetwork/gn-docs/master/general/brand/aging/home.md -;; https://github.com/genenetwork/gn-docs/edit/master/general/brand/aging/home.md + (http-request url) response-body)) (define (form-github-raw-url project repo page) (string-append "https://raw.githubusercontent.com/" |