summaryrefslogtreecommitdiff
path: root/Types
diff options
context:
space:
mode:
authorJoey Hess <joeyh@joeyh.name>2017-11-30 13:45:43 -0400
committerJoey Hess <joeyh@joeyh.name>2017-11-30 14:13:20 -0400
commit2528e3ddb048c4850bb541d75cc7125cae121d2e (patch)
treeff712a70b096ca4ec948462b055d069f51842c5b /Types
parent8a0038ec234f6ddeb64577015943eff2f5e8ee56 (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')
-rw-r--r--Types/Transfer.hs8
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