[Chicken-hackers] [PATCH] chicken-5-eggs fix for spiffy

[Kristian Lein-Mathisen]

Hi all,

I think this should be applied to spiffy in the test egg repository (git://code.call-cc.org/chicken-5-eggs). I'm running chicken5 rev 30af91f4.

Without this patch, I get errors like this:

    Note: the following toplevel variables are referenced but unbound:

      use

      openssl

      ssl-port?

      use

      openssl

      ssl-port->tcp-port

diff --git a/spiffy/spiffy.scm b/spiffy/spiffy.scm

index 5a01f41..bb42538 100644

--- a/spiffy/spiffy.scm

+++ b/spiffy/spiffy.scm

@@ -582,7 +582,7 @@

 

 ;; Imports from the openssl egg, if available

 (define (dynamic-import module symbol default)

-  (handle-exceptions _ default (eval `(let () (use ,module) ,symbol))))

+  (handle-exceptions _ default (eval `(let () (import ,module) ,symbol))))

 

 (define ssl-port?

   (dynamic-import 'openssl 'ssl-port? (lambda (v) #f)))

K.