diff options
| author |  Joey Hess <joeyh@joeyh.name> | 2016-12-02 16:39:01 -0400 |
|---|---|---|
| committer | Joey Hess <joeyh@joeyh.name> | 2016-12-02 16:42:54 -0400 |
| commit | 26a3156541e655ca6a32bbccff79326b045fb531 (patch) | |
| tree | 6d9ca2f783b5025584b0bff92281844fc8f80dc5 /Annex | |
| parent | 956d94aca4305d6f957fb4520f059259a2e7bfdb (diff) | |
plumb assicated files through P2P protocol for updating transfer logs
ReadContent can't update the log, since it reads lazily. This part of
the P2P monad will need to be rethought.
Associated files are heavily sanitized when received from a peer;
they could be an exploit vector.
This commit was sponsored by Jochen Bartl on Patreon.
Diffstat (limited to 'Annex')
| -rw-r--r-- | Annex/Notification.hs | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/Annex/Notification.hs b/Annex/Notification.hs index 4f492878b..e61b362ad 100644 --- a/Annex/Notification.hs +++ b/Annex/Notification.hs @@ -7,7 +7,7 @@ {-# LANGUAGE CPP #-} -module Annex.Notification (NotifyWitness, notifyTransfer, notifyDrop) where +module Annex.Notification (NotifyWitness, noNotification, notifyTransfer, notifyDrop) where import Annex.Common import Types.Transfer @@ -21,6 +21,10 @@ import qualified DBus.Client -- Witness that notification has happened. data NotifyWitness = NotifyWitness +-- Only use when no notification should be done. +noNotification :: NotifyWitness +noNotification = NotifyWitness + {- Wrap around an action that performs a transfer, which may run multiple - attempts. Displays notification when supported and when the user asked - for it. -} |