diff --git a/scheme/base.sld b/scheme/base.sld
index dab7cdf7..d7cfbefc 100644
--- a/scheme/base.sld
+++ b/scheme/base.sld
@@ -346,7 +346,8 @@
                    (filename
                      (substring filename* 1 (string-length filename*))))
               (if (or (equal? 'scheme (car import))
-                      (equal? 'srfi   (car import)))
+                      (equal? 'srfi   (car import))
+                      (equal? 'cyclone (car import)))
                 (string-append (Cyc-installation-dir 'sld) "/" filename) ;; Built-in library
                 filename)))
           (define (_lib:import->library-name import)
diff --git a/scheme/cyclone/libraries.sld b/scheme/cyclone/libraries.sld
index f55a14c6..a3650373 100644
--- a/scheme/cyclone/libraries.sld
+++ b/scheme/cyclone/libraries.sld
@@ -242,7 +242,8 @@
          (filename
            (substring filename* 1 (string-length filename*)))
          (dir (if (or (tagged-list? 'scheme import)
-                      (tagged-list? 'srfi import))
+                      (tagged-list? 'srfi import)
+                      (tagged-list? 'cyclone import))
                   (Cyc-installation-dir 'sld)
                   "")))
     (call/cc
@@ -273,6 +274,7 @@
           (string-append path "" include))
          (dir (if (or (tagged-list? 'scheme import)
                       ;(tagged-list? 'srfi import)
+                      (tagged-list? 'cyclone import)
                   )
                   (Cyc-installation-dir 'sld)
                   "")))