Removed a display statement.

And used libcrypto, which is provided by racket instead of trying to add the crypto lib by hand.

.gitignore

@@ -16,3 +16,4 @@ compiled/
 *.dep
 
 /*.bak
+/private/*.bak

private/self-signed-cert.rkt

@@ -5,6 +5,7 @@
          racket/match
          openssl
          openssl/libssl
+         openssl/libcrypto
          (prefix-in c: racket/contract)
          racket/string
          )
@@ -112,10 +113,7 @@
 
 (define os (system-type 'os*))
 
-(define libopenssl (cond
-                     ([eq? os 'windows] (ffi-lib "libeay32.dll"))
-                     (else (error (format "Cannot load openssl library on platform ~a" os)))
-                     ))
+(define libopenssl libcrypto)
 
 (define-ffi-definer define-ssl libopenssl)
 
@@ -270,7 +268,6 @@
                                    alt-name (string-length alt-name))
 
             (let ((r (X509_EXTENSION_create_by_NID #f NID_subject_alt_name 0 subj-alt-name-asn1)))
-              (displayln r)
               (when (eq? r #f)
                 (error "Cannot allocate X509 Extenstion for Subject Alt Name"))