Permalink
Browse files

Fix a test

  • Loading branch information...
1 parent 8bf6f3c commit d36a0c34c94824cf88608c188e3706e395661092 @snoyberg committed Oct 3, 2012
Showing with 1 addition and 1 deletion.
  1. +1 −1 network-conduit/test/main.hs
@@ -12,7 +12,7 @@ main = do
$ runTCPClient (clientSettings 4000 "localhost") doNothing
echo :: Application IO
-echo ad = adSource ad $$ adSink ad
+echo ad = appSource ad $$ appSink ad
doNothing :: Application IO
doNothing _ = return ()

0 comments on commit d36a0c3

Please sign in to comment.