Delete empty unit tests files, remove 1- and 1+, reorder IN: lines in a lot of places...

[factor.git] / extra / irc / client / internals / internals.factor

diff --git a/extra/irc/client/internals/internals.factor b/extra/irc/client/internals/internals.factor
index b065dfe2f0b22168193b7f6014c50b90e0805853..6ce851e7dd0137a758e981bb637189db1d8b0e73 100644 (file)
--- a/extra/irc/client/internals/internals.factor
+++ b/extra/irc/client/internals/internals.factor
@@ -10,7 +10,7 @@ IN: irc.client.internals
 : do-connect ( server port quot: ( host port -- stream ) attempts -- stream/f )
     dup 0 > [
         [ drop call( host port -- stream ) ]
-        [ drop 15 sleep 1- do-connect ]
+        [ drop 15 sleep 1 - do-connect ]
         recover
     ] [ 2drop 2drop f ] if ;