blob: c79e6cc51e6c0540945d5d1ce7753ab7ef7ce4df (
plain)
1
2
3
4
5
6
7
8
9
10
11
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
|