diff options
author | Joey Hess <joeyh@joeyh.name> | 2017-11-30 13:45:43 -0400 |
---|---|---|
committer | Joey Hess <joeyh@joeyh.name> | 2017-11-30 14:13:20 -0400 |
commit | 2528e3ddb048c4850bb541d75cc7125cae121d2e (patch) | |
tree | ff712a70b096ca4ec948462b055d069f51842c5b /Types/Transfer.hs | |
parent | 8a0038ec234f6ddeb64577015943eff2f5e8ee56 (diff) |
rethought --relaxed change
Better to make it not be surprising and slow, than surprising and fast.
--raw can be used when it needs to be really fast.
Implemented adding a youtube-dl supported url to an existing file.
This commit was sponsored by andrea rota.
Diffstat (limited to 'Types/Transfer.hs')
-rw-r--r-- | Types/Transfer.hs | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/Types/Transfer.hs b/Types/Transfer.hs index 73952c56ec..1b54f85110 100644 --- a/Types/Transfer.hs +++ b/Types/Transfer.hs @@ -87,7 +87,7 @@ instance Observable (Either e Bool) where observeBool (Right b) = b observeFailure = Right False -instance Observable (Either e (Maybe a)) where - observeBool (Right (Just _)) = True - observeBool _ = False - observeFailure = Right Nothing +instance Observable (Maybe a) where + observeBool (Just _) = True + observeBool Nothing = False + observeFailure = Nothing |