summaryrefslogtreecommitdiffstats
path: root/requires.scm
diff options
context:
space:
mode:
authorBryan Newbold <bnewbold@robocracy.org>2017-02-20 00:05:27 -0800
committerBryan Newbold <bnewbold@robocracy.org>2017-02-20 00:05:27 -0800
commitc7d035ae1a729232579a0fe41ed5affa131d3623 (patch)
treefb387f7c2a8e01cf603d4c75fbbaa68f711df986 /requires.scm
parentdeda2c0fd8689349fea2a900199a76ff7ecb319e (diff)
downloadscm-c7d035ae1a729232579a0fe41ed5affa131d3623.tar.gz
scm-c7d035ae1a729232579a0fe41ed5affa131d3623.zip
Import Upstream version 5d9upstream/5d9
Diffstat (limited to 'requires.scm')
-rw-r--r--requires.scm3
1 files changed, 1 insertions, 2 deletions
diff --git a/requires.scm b/requires.scm
index 97d7cdd..cad8db0 100644
--- a/requires.scm
+++ b/requires.scm
@@ -1,6 +1,6 @@
;;; "require.scm" Trampoline to slib/require.scm
-(set! library-vicinity
+(define library-vicinity
(let* ((vl (case (software-type)
((AMIGA) '(#\: #\/))
((MS-DOS WINDOWS ATARIST OS/2) '(#\\ #\/))
@@ -19,4 +19,3 @@
(string-append (substring iv 0 (+ 1 pos)) "slib" vs))
(else (loop (- pos 1)))))))
(lambda () lv)))
-(load (in-vicinity (library-vicinity) "require"))