fix mistake

webyrd · Aug 23, 2024 · 03674df · 03674df
1 parent ac11e61
commit 03674df
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/contrib/medikanren2/neo/utils.rkt b/contrib/medikanren2/neo/utils.rkt
@@ -57,7 +57,7 @@
 
 (define (concept->name curie)
   (let ((name (assoc "name" (curie->properties curie))))
-    (if name (cdr name) curie)))
+    (if name (cadr name) curie)))
 
 (define (concept->category curie)
   (let ((category (assoc "category" (curie->properties curie))))