From 612d1394bf2ba9c97e993148ac44cf44d28d1aa8 Mon Sep 17 00:00:00 2001 From: siiky Date: Sat, 1 Jul 2023 19:50:12 +0100 Subject: [PATCH] Avoid crashing on egg files with non-string `version` field `chicken-install` would crash when building a path if the `version` field of an egg file was not a string, such as `2.0`. --- chicken-install.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/chicken-install.scm b/chicken-install.scm index 4a6eb9b1..628d64f1 100644 --- a/chicken-install.scm +++ b/chicken-install.scm @@ -576,7 +576,7 @@ (loop (cdr srvs))))))) ;; The order of probe-dir's here is important. First try ;; the path with version, then the path without version. - ((or (probe-dir (make-pathname (list (car locs) name) lversion)) + ((or (probe-dir (make-pathname (list (car locs) name) (->string lversion))) (probe-dir (make-pathname (car locs) name))) => (lambda (dir) ;; for locally available eggs, check set of files and -- 2.40.1