add missing type signature

This commit is contained in:
Joey Hess 2018-08-06 15:41:44 -04:00
parent 38ddd6072d
commit 4d4d238a08
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38

View file

@ -314,6 +314,7 @@ downloadWeb o url urlinfo file =
{- The destination file is not known at start time unless the user provided
- a filename. It's not displayed then for output consistency,
- but is added to the json when available. -}
showStartAddUrl :: URLString -> AddUrlOptions -> Annex ()
showStartAddUrl url o = do
showStart' "addurl" (Just url)
case fileOption (downloadOptions o) of