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

fix build

Browse source
This commit is contained in:
Joey Hess 2017-11-30 13:21:19 -04:00
parent 31b4d7c6d0
commit 22a9389bc7
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
Annex/YoutubeDl.hs
View file

@ -84,5 +84,5 @@ youtubeDlTo key url dest = do
youtubeDlSupported :: URLString -> Annex (Either String Bool)
youtubeDlSupported url = catchMsgIO $ do
opts <- map Param . annexYoutubeDlOptions <$> Annex.getGitConfig
let opts' = opts ++ [ url, "--simulate" ]
liftIO $ snd <$> processTranscript "youtube-dl" opts' Nothing
let opts' = opts ++ [ Param url, Param "--simulate" ]
liftIO $ snd <$> processTranscript "youtube-dl" (toCommand opts') Nothing