From 0e2042729621f2279ae7ef085336d30b52419a1c Mon Sep 17 00:00:00 2001
From: Tom Willemse <tom@ryuslash.org>
Date: Thu, 17 Nov 2022 22:30:08 -0800
Subject: [PATCH] Add patch file for SCSH

---
 scsh-nonstring-search-path.patch | 12 ++++++++++++
 1 file changed, 12 insertions(+)
 create mode 100644 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