From 43f42bd29d9c3aa304785f32c228c4fa23b8c959 Mon Sep 17 00:00:00 2001
From: Baylac-Jacqué Félix <felix@alternativebit.fr>
Date: Wed, 13 Sep 2017 15:35:23 +0200
Subject: Implemented RPC set's payload parser.

---
 src/Network/WireGuard/Internal/Data/RpcTypes.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/Network/WireGuard/Internal/Data/RpcTypes.hs')

diff --git a/src/Network/WireGuard/Internal/Data/RpcTypes.hs b/src/Network/WireGuard/Internal/Data/RpcTypes.hs
index d45d38e..a78d9df 100644
--- a/src/Network/WireGuard/Internal/Data/RpcTypes.hs
+++ b/src/Network/WireGuard/Internal/Data/RpcTypes.hs
@@ -31,7 +31,7 @@ data RpcRequest = RpcRequest {
 data RpcSetPayload = RpcSetPayload {
   devicePayload :: !RpcDevicePayload,
   peersPayload  :: [RpcPeerPayload]
-}
+} deriving (Eq, Show)
 
 -- | Device related payload sent together with a set RPC operation.
 data RpcDevicePayload = RpcDevicePayload {
-- 
cgit v1.2.3-59-g8ed1b