chicken-hackers
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[PATCH 2/2] Fall back to null when gathering components for "chicken-sta


From: Evan Hanson
Subject: [PATCH 2/2] Fall back to null when gathering components for "chicken-status -c" output
Date: Mon, 19 Apr 2021 19:40:49 +1200

---
 chicken-status.scm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/chicken-status.scm b/chicken-status.scm
index b9dfd759..1b79349f 100644
--- a/chicken-status.scm
+++ b/chicken-status.scm
@@ -143,7 +143,8 @@
       ((c-include) (list (list 'c-include mode (cadr info))))
       ((scheme-include) (list (list 'scheme-include mode (cadr info))))
       ((program) (list (list 'program mode (cadr info))))
-      ((c-object) (list (list 'c-object mode (cadr info))))))
+      ((c-object) (list (list 'c-object mode (cadr info))))
+      (else '())))
 
   (define (list-installed-components eggs)
     (let ((w (quotient (- (get-terminal-width) 2) 2)))
-- 
2.29.3




reply via email to

[Prev in Thread] Current Thread [Next in Thread]