git annex sync --content to exports

Assistant still todo.

This commit was sponsored by Boyd Stephen Smith Jr. on Patreon

2 files changed, 2 insertions, 5 deletions

diff --git a/Remote/Helper/Export.hs b/Remote/Helper/Export.hs
index d62c5a7e8..f5c3585c5 100644
--- a/Remote/Helper/Export.hs
+++ b/Remote/Helper/Export.hs
@@ -17,6 +17,7 @@ import Backend
 import Remote.Helper.Encryptable (isEncrypted)
 import Database.Export
 import Logs.Export
+import Annex.Export
 import Annex.LockFile
 import Git.Sha
 
@@ -42,11 +43,6 @@ instance HasExportUnsupported (Annex (ExportActions Annex)) where
 		, renameExport = \_ _ _ -> return False
 		}
 
-exportTree :: RemoteConfig -> Bool
-exportTree c = case M.lookup "exporttree" c of
-	Just "yes" -> True
-	_ -> False
-
 exportIsSupported :: RemoteConfig -> RemoteGitConfig -> Annex Bool
 exportIsSupported = \_ _ -> return True
 
diff --git a/Remote/S3.hs b/Remote/S3.hs
index 52d03ba94..5e76b9810 100644
--- a/Remote/S3.hs
+++ b/Remote/S3.hs
@@ -34,6 +34,7 @@ import System.Log.Logger
 import Annex.Common
 import Types.Remote
 import Types.Export
+import Annex.Export
 import qualified Git
 import Config
 import Config.Cost