From b0e33af4d8c95d428fdc8bce40fc6a98a9e8185b Mon Sep 17 00:00:00 2001 From: fr33domlover Date: Wed, 6 Mar 2019 01:49:55 +0000 Subject: [PATCH] Fix typo in actor key route --- src/Vervis/Handler/Inbox.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Vervis/Handler/Inbox.hs b/src/Vervis/Handler/Inbox.hs index f4b682e..5de40f1 100644 --- a/src/Vervis/Handler/Inbox.hs +++ b/src/Vervis/Handler/Inbox.hs @@ -291,4 +291,4 @@ getActorKey1R :: Handler TypedContent getActorKey1R = getActorKey (\ (k1, _, _) -> k1) ActorKey1R getActorKey2R :: Handler TypedContent -getActorKey2R = getActorKey (\ (k1, _, _) -> k1) ActorKey2R +getActorKey2R = getActorKey (\ (_, k2, _) -> k2) ActorKey2R