Fix typo in actor key route

This commit is contained in:
fr33domlover 2019-03-06 01:49:55 +00:00
parent 043022d117
commit b0e33af4d8

View file

@ -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