aboutsummaryrefslogtreecommitdiff
path: root/gnu/packages/patches/scsh-nonstring-search-path.patch
blob: 3934d49fa314bef83dffb4af2af4d1e8fad39e19 (about) (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
This patch was submitted upstream:
https://github.com/scheme/scsh/pull/46

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