From cda38f19ed9493070433067116ad720b78714dfd Mon Sep 17 00:00:00 2001 From: Daniel Gröber Date: Fri, 20 Dec 2013 18:03:48 +0100 Subject: Fix key order of test dictionaries in PeerAddrSpec --- tests/Network/BitTorrent/Core/PeerAddrSpec.hs | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'tests/Network') diff --git a/tests/Network/BitTorrent/Core/PeerAddrSpec.hs b/tests/Network/BitTorrent/Core/PeerAddrSpec.hs index e5850998..1bc8d4b4 100644 --- a/tests/Network/BitTorrent/Core/PeerAddrSpec.hs +++ b/tests/Network/BitTorrent/Core/PeerAddrSpec.hs @@ -171,8 +171,8 @@ spec = do it "properly bencoded (ipv4)" $ do - BE.decode "d7:peer id20:01234567890123456789\ - \2:ip11:168.192.0.1\ + BE.decode "d2:ip11:168.192.0.1\ + \7:peer id20:01234567890123456789\ \4:porti6881e\ \e" `shouldBe` @@ -181,8 +181,8 @@ spec = do 6881) it "properly bencoded (ipv6)" $ do - BE.decode "d7:peer id20:01234567890123456789\ - \2:ip3:::1\ + BE.decode "d2:ip3:::1\ + \7:peer id20:01234567890123456789\ \4:porti6881e\ \e" `shouldBe` -- cgit v1.2.3