about summary refs log tree commit diff
diff options
context:
space:
mode:
authorFrederick Muriuki Muriithi2024-10-30 14:42:45 -0500
committerFrederick Muriuki Muriithi2024-10-30 14:42:45 -0500
commitec39b668f9d07c7041ed75dbb5fb5f5798635855 (patch)
tree25d0cc13900681dd6e17796c264e0d9d80eb3a82
parentad3f1176642a499229554d490037b533ef7da418 (diff)
downloadgn-guile-ec39b668f9d07c7041ed75dbb5fb5f5798635855.tar.gz
Fix format for the +info+ pairs
Fix the format for the info pairs to avoid failure when accessing the
root of the application.
-rw-r--r--web/webserver.scm6
1 files changed, 3 insertions, 3 deletions
diff --git a/web/webserver.scm b/web/webserver.scm
index 03fad92..d4044a8 100644
--- a/web/webserver.scm
+++ b/web/webserver.scm
@@ -34,14 +34,14 @@
   (getenv "CGIT_REPO_PATH"))
 
 (define +info+
-  `(("name" . "GeneNetwork REST API") ("version" ,get-version)
+  `(("name" . "GeneNetwork REST API") ("version" . ,get-version)
     ("comment" . "This is the official REST API for the GeneNetwork service hosted at https://genenetwork.org/")
     ("license"
      ("source code (unless otherwise specified)" . "Affero GNU Public License 3.0 (AGPL3)")
      ("data (unless otherwise specified)" . "Attribution-NonCommercial-NoDerivatives 4.0 International (CC BY-NC-ND 4.0)"))
     ("note" . "This is work in progress (WIP). Note that the final base URL will change! The temporary prefix is:")
-    ("prefix" ,(prefix))
-    ("links" ("species" ,(mk-meta "species")))))
+    ("prefix" . ,(prefix))
+    ("links" ("species" . ,(mk-meta "species")))))
 
 (define +info-meta+
   `(("doc" ,(mk-html "info"))