From 1dbd625ff26834ac6df44dc1d86b4650c08279e8 Mon Sep 17 00:00:00 2001
From: retropikzel <retropikzel@iki.fi>
Date: Fri, 18 Apr 2025 11:49:32 +0300
Subject: [PATCH] Fixes for kawa

---
 compile-r7rs.scm | 2 ++
 libs/data.sld    | 7 ++-----
 2 files changed, 4 insertions(+), 5 deletions(-)

diff --git a/compile-r7rs.scm b/compile-r7rs.scm
index 619a2eb..119e657 100644
--- a/compile-r7rs.scm
+++ b/compile-r7rs.scm
@@ -31,7 +31,9 @@
        ;meevax
        mit-scheme
        mosh
+       ;racket
        ;picrin
+       ;scheme-rs
        ;stak
        sagittarius
        skint
diff --git a/libs/data.sld b/libs/data.sld
index 04afd91..29aa7c0 100644
--- a/libs/data.sld
+++ b/libs/data.sld
@@ -283,11 +283,8 @@
                                  " "
                                  "-Dkawa.import.path="
                                  ,@(map (lambda (item)
-                                          (string-append item ":" item "/*.sld:" " "))
-                                        prepend-directories)
-                                 ,@(map (lambda (item)
-                                          (string-append item ":" item "/*.sld:" " "))
-                                        append-directories)
+                                          (string-append item "/*.sld:"))
+                                        (append prepend-directories append-directories))
                                  " "
                                  ,input-file)))))
         (larceny