~ chicken-core (master) 469020769d6d86c09a08789dedd5a2a65c1a1aee

commit 469020769d6d86c09a08789dedd5a2a65c1a1aee
Author:     felix <felix@call-with-current-continuation.org>
AuthorDate: Thu Aug 14 16:38:01 2025 +0200
Commit:     felix <felix@call-with-current-continuation.org>
CommitDate: Thu Aug 14 16:38:01 2025 +0200

    fix validation (thanks, Moritz)

diff --git a/chicken-install.scm b/chicken-install.scm
index 4d5f9b25..32a5bf9f 100644
--- a/chicken-install.scm
+++ b/chicken-install.scm
@@ -137,7 +137,10 @@
 ;;; validate egg-information tree
 
 (define (egg-version? v)
-  (and (string? v) (positive? (string-length v))))
+  (and (pair? v)
+       (null? (cdr v))
+       (let ((v (car v)))
+         (and (string? v) (positive? (string-length v))))))
 
 (define (optname? x)
   (and (list? x)