summaryrefslogtreecommitdiffstats
path: root/requires.scm
diff options
context:
space:
mode:
authorBryan Newbold <bnewbold@robocracy.org>2017-02-20 00:05:26 -0800
committerBryan Newbold <bnewbold@robocracy.org>2017-02-20 00:05:26 -0800
commitdeda2c0fd8689349fea2a900199a76ff7ecb319e (patch)
treec9726d54a0806a9b0c75e6c82db8692aea0053cf /requires.scm
parent3278b75942bdbe706f7a0fba87729bb1e935b68b (diff)
downloadscm-upstream/5d6.tar.gz
scm-upstream/5d6.zip
Import Upstream version 5d6upstream/5d6
Diffstat (limited to 'requires.scm')
-rw-r--r--requires.scm12
1 files changed, 6 insertions, 6 deletions
diff --git a/requires.scm b/requires.scm
index bd4b8bf..97d7cdd 100644
--- a/requires.scm
+++ b/requires.scm
@@ -2,12 +2,12 @@
(set! library-vicinity
(let* ((vl (case (software-type)
- ((AMIGA) '(#\: #\/))
- ((MS-DOS WINDOWS ATARIST OS/2) '(#\\ #\/))
- ((MACOS THINKC) '(#\:))
- ((NOSVE) '(#\: #\.))
- ((UNIX COHERENT) '(#\/))
- ((VMS) '(#\: #\]))))
+ ((AMIGA) '(#\: #\/))
+ ((MS-DOS WINDOWS ATARIST OS/2) '(#\\ #\/))
+ ((MACOS THINKC) '(#\:))
+ ((NOSVE) '(#\: #\.))
+ ((UNIX COHERENT PLAN9) '(#\/))
+ ((VMS) '(#\: #\]))))
(iv (implementation-vicinity))
(vc (and (positive? (string-length iv))
(string-ref iv (+ -1 (string-length iv)))))