From 03674dfb5584280c0166611b3d027b3de73a29de Mon Sep 17 00:00:00 2001 From: Kaiwen He Date: Fri, 23 Aug 2024 13:59:22 -0500 Subject: [PATCH] fix mistake --- contrib/medikanren2/neo/utils.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/contrib/medikanren2/neo/utils.rkt b/contrib/medikanren2/neo/utils.rkt index 249bf0c7..92b989e7 100644 --- 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))))