From 9dff66430a956f7c8fe92a600bf36c4b1895f958 Mon Sep 17 00:00:00 2001 From: Pjotr Prins Date: Wed, 23 Aug 2023 11:21:39 +0200 Subject: Tests pass and set resolves --- gn/data/species.scm | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) (limited to 'gn') 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)))))) )) -- cgit v1.2.3