fix build

This commit is contained in:
Joey Hess 2023-04-12 14:31:56 -04:00
parent fdac66ae10
commit 3e5829721f
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38

View file

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