Changeset 15508 in project

Timestamp:

08/17/09 22:18:15 (11 years ago)

Author:

sjamaan

Message:

SSL does not use keyword args, but positional optional args

File:

• release/4/spiffy/trunk/spiffy.scm (modified) (1 diff)

release/4/spiffy/trunk/spiffy.scm

@@ -435 +435 @@
     (letrec ((thread-count (make-mutex/value 'thread-count 0))
              (listener (if ssl-context
-                           (ssl-listen port ctx: ssl-context)
+                           (ssl-listen port 4 #f ssl-context)
                            (tcp-listen port)))
              (accept-next-connection