Hi Vasilij,
> This isn't small due to what seems to be loads of whitespace changes.
> Could you please fix those and resend the patch?
My bad, looks like my emacs setup got a bit aggressive.
Now the patch is actually small.
Harley
Index: openssl.scm
===================================================================
--- openssl.scm (revision 39419)
+++ openssl.scm (working copy)
@@ -257,7 +257,7 @@
((eq? x (foreign-value "SSL_ERROR_WANT_X509_LOOKUP" int))
'want-X509-lookup)
((eq? x (foreign-value "SSL_ERROR_SYSCALL" int))
- 'syscall)
+ (if (zero? ret) 'ssl-eof 'syscall))
((eq? x (foreign-value "SSL_ERROR_SSL" int))
'ssl)
(else
