From 0e2042729621f2279ae7ef085336d30b52419a1c Mon Sep 17 00:00:00 2001
From: Tom Willemse
Date: Thu, 17 Nov 2022 22:30:08 -0800
Subject: Add patch file for SCSH

---
 scsh-nonstring-search-path.patch | 12 ++++++++++++
 1 file changed, 12 insertions(+)
 create mode 100644 scsh-nonstring-search-path.patch

(limited to 'scsh-nonstring-search-path.patch')

diff --git a/scsh-nonstring-search-path.patch b/scsh-nonstring-search-path.patch
new file mode 100644
index 0000000..c79e6cc
--- /dev/null
+++ b/scsh-nonstring-search-path.patch
@@ -0,0 +1,12 @@
+diff --git a/scheme/lib-dirs.scm b/scheme/lib-dirs.scm
+index a1fc009..c630fb4 100644
+--- a/scheme/lib-dirs.scm
++++ b/scheme/lib-dirs.scm
+@@ -75,6 +75,7 @@
+               (let ((val (read)))
+                 (cond ((eof-object? val) '())
+                       ((string? val) (cons val (recur)))
++                      ((symbol? val) (cons (symbol->string val) (recur)))
+                       ((not val) (append default-lib-dirs (recur)))
+                       (else 
+                        (error 
-- 
cgit v1.2.3-54-g00ecf