mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

fix windows build

Browse source
This commit is contained in:
Joey Hess 2023-04-12 19:33:19 -04:00
parent c5bcb55a8b
commit 2efceba789
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
Utility/Terminal.hs
View file

@ -37,7 +37,7 @@ checkIsTerminal h = do
h' <- getStdHandle sTD_OUTPUT_HANDLE h' <- getStdHandle sTD_OUTPUT_HANDLE
`catch` \(_ :: IOError) -> `catch` \(_ :: IOError) ->
return nullHANDLE return nullHANDLE
if h == nullHANDLE if h' == nullHANDLE
then return (IsTerminal False) then return (IsTerminal False)
else do else do
b' <- isMinTTYHandle h' b' <- isMinTTYHandle h'