From ff3daa5092bfbd26ac43eef2f3e30a492dd99d47 Mon Sep 17 00:00:00 2001 From: Slava Pestov Date: Tue, 15 Jun 2010 18:32:13 -0400 Subject: [PATCH] pop3: fix tests to not hang if openssl is not installed --- extra/pop3/pop3-tests.factor | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/extra/pop3/pop3-tests.factor b/extra/pop3/pop3-tests.factor index 8efc07ceee..10c5024d58 100644 --- a/extra/pop3/pop3-tests.factor +++ b/extra/pop3/pop3-tests.factor @@ -1,7 +1,7 @@ ! Copyright (C) 2009 Elie Chaftari. ! See http://factorcode.org/license.txt for BSD license. USING: concurrency.promises namespaces kernel pop3 pop3.server -sequences tools.test accessors ; +sequences tools.test accessors calendar ; IN: pop3.tests FROM: pop3 => count delete ; @@ -12,7 +12,7 @@ FROM: pop3 => count delete ; [ ] [ "127.0.0.1" >>host - "p1" get ?promise >>port + "p1" get 5 seconds ?promise-timeout >>port connect ] unit-test [ ] [ "username@host.com" >user ] unit-test @@ -59,7 +59,7 @@ FROM: pop3 => count delete ; [ ] [ "127.0.0.1" >>host - "p2" get ?promise >>port + "p2" get 5 seconds ?promise-timeout >>port "username@host.com" >>user "password" >>pwd connect