pop3: fix tests to not hang if openssl is not installed
parent
5d6816d364
commit
34d261a9e1
|
@ -1,7 +1,7 @@
|
||||||
! Copyright (C) 2009 Elie Chaftari.
|
! Copyright (C) 2009 Elie Chaftari.
|
||||||
! See http://factorcode.org/license.txt for BSD license.
|
! See http://factorcode.org/license.txt for BSD license.
|
||||||
USING: concurrency.promises namespaces kernel pop3 pop3.server
|
USING: concurrency.promises namespaces kernel pop3 pop3.server
|
||||||
sequences tools.test accessors ;
|
sequences tools.test accessors calendar ;
|
||||||
IN: pop3.tests
|
IN: pop3.tests
|
||||||
|
|
||||||
FROM: pop3 => count delete ;
|
FROM: pop3 => count delete ;
|
||||||
|
@ -12,7 +12,7 @@ FROM: pop3 => count delete ;
|
||||||
[ ] [
|
[ ] [
|
||||||
<pop3-account>
|
<pop3-account>
|
||||||
"127.0.0.1" >>host
|
"127.0.0.1" >>host
|
||||||
"p1" get ?promise >>port
|
"p1" get 5 seconds ?promise-timeout >>port
|
||||||
connect
|
connect
|
||||||
] unit-test
|
] unit-test
|
||||||
[ ] [ "username@host.com" >user ] unit-test
|
[ ] [ "username@host.com" >user ] unit-test
|
||||||
|
@ -59,7 +59,7 @@ FROM: pop3 => count delete ;
|
||||||
[ ] [
|
[ ] [
|
||||||
<pop3-account>
|
<pop3-account>
|
||||||
"127.0.0.1" >>host
|
"127.0.0.1" >>host
|
||||||
"p2" get ?promise >>port
|
"p2" get 5 seconds ?promise-timeout >>port
|
||||||
"username@host.com" >>user
|
"username@host.com" >>user
|
||||||
"password" >>pwd
|
"password" >>pwd
|
||||||
connect
|
connect
|
||||||
|
|
Loading…
Reference in New Issue