diff options
| -rw-r--r-- | gn/data/species.scm | 5 | ||||
| -rw-r--r-- | web/gn-uri.scm | 1 |
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") |