~ruther/guix-local

ref: 64668f7c15fa639831209f25e313c99a1047de7b guix-local/gnu/packages/patches/scsh-nonstring-search-path.patch -rw-r--r-- 576 bytes
64668f7c — Rutherther etc: release: Add spare space to the release VM image. a month ago 
                                                                                
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