From f24b9140d6f74804d5599ec225717d38ca443813 Mon Sep 17 00:00:00 2001
From: Bryan Newbold <bnewbold@robocracy.org>
Date: Mon, 20 Feb 2017 00:05:26 -0800
Subject: Import Upstream version 2c0

---
 scainit.scm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'scainit.scm')

diff --git a/scainit.scm b/scainit.scm
index 1103bc6..93fed1e 100644
--- a/scainit.scm
+++ b/scainit.scm
@@ -86,7 +86,8 @@
 (let ((here (lambda (file)
 	      (in-vicinity (library-vicinity) file)))
       (scmhere (lambda (file)
-		 (in-vicinity (library-vicinity) file (scheme-file-suffix)))))
+		 (in-vicinity (library-vicinity)
+			      (string-append file (scheme-file-suffix))))))
   (for-each (lambda (file) (slib:load (here file)))
 	    '("scaoutp"
 	      "scaglob"
-- 
cgit v1.2.3