From 641c00da98499a85fd0cdd99d093784344b4e757 Mon Sep 17 00:00:00 2001 From: tv Date: Tue, 8 Jun 2021 20:40:19 +0200 Subject: Main.app: admit geometry when capturing image data --- src/main.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src') diff --git a/src/main.hs b/src/main.hs index fbf2bc9..7a01b9c 100644 --- a/src/main.hs +++ b/src/main.hs @@ -100,7 +100,7 @@ app client = do captureFinish Nothing where - [Variant (ValueBytes rawImage)] = rest + [ Variant (ValueBytes rawImage), Variant _geometry ] = rest _sig -> return () -- cgit v1.2.3