mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2025-01-05 10:56:56 -05:00
16 lines
576 B
Diff
16 lines
576 B
Diff
|
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
|