From 3e5829721feee14cfe23af2c93107d76c49e7c85 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Wed, 12 Apr 2023 14:31:56 -0400 Subject: [PATCH] fix build --- Command/Inprogress.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Command/Inprogress.hs b/Command/Inprogress.hs index b4050d207f..58c5bcfd77 100644 --- a/Command/Inprogress.hs +++ b/Command/Inprogress.hs @@ -31,7 +31,7 @@ optParser desc = InprogressOptions seek :: InprogressOptions -> CommandSeek seek o = do - IsTerminal isterminal <- liftIO $ checkIsTerminal stdout + isterminal <- liftIO $ checkIsTerminal stdout ts <- map (transferKey . fst) <$> getTransfers case keyOptions o of Just WantAllKeys ->