aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorPjotr Prins2023-07-08 07:00:14 -0500
committerPjotr Prins2023-07-08 07:00:14 -0500
commit429d1d1e2ee83eb8448cea8cde455e3e1f4dc98f (patch)
treeb5a64eaac3e74d11ebe0a46f82ef1b944d313e8b
parentdf6bf726ca698a61c516c792128b34fef10958ea (diff)
downloadgenenetwork3-429d1d1e2ee83eb8448cea8cde455e3e1f4dc98f.tar.gz
guile server: adding docstrings
-rwxr-xr-xgn3-guile/web/webserver.scm3
1 files changed, 3 insertions, 0 deletions
diff --git a/gn3-guile/web/webserver.scm b/gn3-guile/web/webserver.scm
index 3fd79f8..f14fb25 100755
--- a/gn3-guile/web/webserver.scm
+++ b/gn3-guile/web/webserver.scm
@@ -25,12 +25,15 @@
"https://genenetwork.org")
(define (prefix)
+ "Build the API URL including version"
(string-append (base-url) "/api/" (get-version)))
(define (mk-url postfix)
+ "Add the path to the API URL"
(string-append (prefix) "/" postfix))
(define (meta url)
+ "Adds /meta to the URL"
(string-append url "/meta"))
(define info `(