Add patch file for SCSH

This commit is contained in:
Tom Willemse 2022-11-17 22:30:08 -08:00
parent 679d9a127a
commit 0e20427296
Signed by: ryuslash
GPG key ID: 7D5C407B435025C1

View file

@ -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