From 836477902c6b52a45749787c63305c0a231df64b Mon Sep 17 00:00:00 2001
From: w6vvn <vivienne@w6vvn.net>
Date: Mon, 1 Sep 2025 16:43:05 -0700
Subject: [PATCH] correct a minor issue with header parsing

---
 gem300.rkt | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/gem300.rkt b/gem300.rkt
index 7c7bbea..62883bc 100644
--- a/gem300.rkt
+++ b/gem300.rkt
@@ -29,8 +29,8 @@
         (let ([header (read-line c-in 'return-linefeed)])
           (define-values (status meta)
             (let ([status-meta (string-split header " ")])
-              (values (list-ref status-meta 0)
-                      (list-ref status-meta 1))))
+              (values (car status-meta)
+                      (string-join (cdr status-meta)))))
 
           (cond
             [(> (string-length status) 2)