aboutsummaryrefslogtreecommitdiff
path: root/gn/db
diff options
context:
space:
mode:
authorPjotr Prins2023-08-27 11:24:08 +0200
committerPjotr Prins2023-08-27 11:24:08 +0200
commit2a8ae48a36cc88105c9a4c056132c9a47e2f120a (patch)
treee89080e0c5b9f614e2035686d0898cadba2a8dc2 /gn/db
parentafbbd86f316c2bfa70b86c1c51a4147a83f285ec (diff)
downloadgn-guile-2a8ae48a36cc88105c9a4c056132c9a47e2f120a.tar.gz
Shortnames
Diffstat (limited to 'gn/db')
-rw-r--r--gn/db/sparql.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/gn/db/sparql.scm b/gn/db/sparql.scm
index 7e512ff..c413b9a 100644
--- a/gn/db/sparql.scm
+++ b/gn/db/sparql.scm
@@ -100,7 +100,7 @@ PREFIX rdf: <http://www.w3.org/1999/02/22-rdf-syntax-ns#>
(define recs '())
(define h (compile-species recs table))
(assoc "http://genenetwork.org/species_drosophila_melanogaster" h)
-(assoc-ref h "http://genenetwork.org/species_drosophila_melanogaster") ;; note switch!
+(assoc-ref h "http://genenetwork.org/id/Drosophila_melanogaster")
(define d (car h))
(assoc-ref (list d) "http://genenetwork.org/species_drosophila_melanogaster")