add support for readonly remotes

Currently only the web special remote is readonly, but it'd be possible to
also have readonly drives, or other remotes. These are handled in the
assistant by only downloading from them, and never trying to upload to
them.

1 files changed, 1 insertions, 0 deletions

diff --git a/Remote/Bup.hs b/Remote/Bup.hs
index 3dfedfec6..e3ba7fe9b 100644
--- a/Remote/Bup.hs
+++ b/Remote/Bup.hs
@@ -64,6 +64,7 @@ gen r u c = do
 				then Just buprepo
 				else Nothing
 			, remotetype = remote
+			, readonly = False
 			}
 
 bupSetup :: UUID -> RemoteConfig -> Annex RemoteConfig