aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorPjotr Prins2023-08-23 11:21:39 +0200
committerPjotr Prins2023-08-23 11:21:39 +0200
commit9dff66430a956f7c8fe92a600bf36c4b1895f958 (patch)
treea2a893262ac1671c7b6cac641adfebfb85611b29
parentc322b6e5f5011d42a657334553ce0698c567ac2c (diff)
downloadgn-guile-9dff66430a956f7c8fe92a600bf36c4b1895f958.tar.gz
Tests pass and set resolves
-rw-r--r--gn/data/species.scm5
-rw-r--r--web/gn-uri.scm1
2 files changed, 4 insertions, 2 deletions
diff --git a/gn/data/species.scm b/gn/data/species.scm
index ca3bb05..7923101 100644
--- a/gn/data/species.scm
+++ b/gn/data/species.scm
@@ -130,5 +130,8 @@
("meta" . ,(mk-meta id))
("data" . ,(mk-data id))
("up" . ,(mk-meta "species"))
- ("links" . ,(list->vector (get-group-links (gnid-species id))))
+ ("meta-links" . ,(list->vector (get-group-links (gnid-species id)
+ (lambda (r) (mk-meta (url-parse-id r))))))
+ ("links" . ,(list->vector (get-group-links (gnid-species id)
+ (lambda (r) (mk-meta (url-parse-id r))))))
))
diff --git a/web/gn-uri.scm b/web/gn-uri.scm
index de70ea7..f275bcd 100644
--- a/web/gn-uri.scm
+++ b/web/gn-uri.scm
@@ -34,7 +34,6 @@
"unknown"
))
-
(define get-version
"2.0")