summaryrefslogtreecommitdiff
path: root/Annex/Notification.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Annex/Notification.hs')
-rw-r--r--Annex/Notification.hs10
1 files changed, 0 insertions, 10 deletions
diff --git a/Annex/Notification.hs b/Annex/Notification.hs
index 27acd0302..ea24be983 100644
--- a/Annex/Notification.hs
+++ b/Annex/Notification.hs
@@ -12,7 +12,6 @@ module Annex.Notification (NotifyWitness, noNotification, notifyTransfer, notify
import Annex.Common
import Types.Transfer
-import Utility.Url
#ifdef WITH_DBUS_NOTIFICATIONS
import qualified Annex
import Types.DesktopNotify
@@ -27,15 +26,6 @@ data NotifyWitness = NotifyWitness
noNotification :: NotifyWitness
noNotification = NotifyWitness
-class Transferrable t where
- descTransfrerrable :: t -> Maybe String
-
-instance Transferrable AssociatedFile where
- descTransfrerrable (AssociatedFile af) = af
-
-instance Transferrable URLString where
- descTransfrerrable = Just
-
{- Wrap around an action that performs a transfer, which may run multiple
- attempts. Displays notification when supported and when the user asked
- for it. -}