diff options
| author |  Joey Hess <joey@kitenet.net> | 2012-10-10 15:35:10 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2012-10-10 15:35:10 -0400 |
| commit | da68a5b0942327096adfd63378c47c823e873178 (patch) | |
| tree | 2952192f6d27ac6836a71a4c52181851a63fc46c /Annex | |
| parent | 3a9d1edb4ce0c0b1c2b71598ad7000875ad82828 (diff) | |
webapp: configure new repos to use the standard preferred content settings
Diffstat (limited to 'Annex')
| -rw-r--r-- | Annex/StandardGroups.hs | 8 |
1 files changed, 0 insertions, 8 deletions
diff --git a/Annex/StandardGroups.hs b/Annex/StandardGroups.hs index e94185fbf..7c47cc628 100644 --- a/Annex/StandardGroups.hs +++ b/Annex/StandardGroups.hs @@ -7,11 +7,6 @@ module Annex.StandardGroups where -import Common.Annex -import Logs.Group - -import qualified Data.Set as S - data StandardGroup = ClientGroup | TransferGroup | ArchiveGroup | BackupGroup fromStandardGroup :: StandardGroup -> String @@ -33,6 +28,3 @@ preferredContent ClientGroup = "exclude=*/archive/*" preferredContent TransferGroup = "not inallgroup=client and " ++ preferredContent ClientGroup preferredContent ArchiveGroup = "not copies=archive:1" preferredContent BackupGroup = "" -- all content is preferred - -setStandardGroup :: UUID -> StandardGroup -> Annex () -setStandardGroup u = groupSet u . S.singleton . fromStandardGroup |