aboutsummaryrefslogtreecommitdiff
path: root/Types/StandardGroups.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2013-04-03 03:52:41 -0400
committerGravatar Joey Hess <joey@kitenet.net>2013-04-03 03:52:41 -0400
commit6543d5406c64bb00a58e74305ec9ca09a49faf0b (patch)
tree5e33ceb3ea5b5bf5ad4f2cbb7d08b19cb1026897 /Types/StandardGroups.hs
parentf0dd3c6c1624cb5441eab175c6f5a683d3806885 (diff)
hlint
Diffstat (limited to 'Types/StandardGroups.hs')
-rw-r--r--Types/StandardGroups.hs8
1 files changed, 4 insertions, 4 deletions
diff --git a/Types/StandardGroups.hs b/Types/StandardGroups.hs
index 2262c3bde..434600f3f 100644
--- a/Types/StandardGroups.hs
+++ b/Types/StandardGroups.hs
@@ -57,17 +57,17 @@ descStandardGroup UnwantedGroup = "unwanted: remove content from this repository
preferredContent :: StandardGroup -> String
preferredContent ClientGroup = lastResort
"exclude=*/archive/* and exclude=archive/*"
-preferredContent TransferGroup = lastResort $
+preferredContent TransferGroup = lastResort
"not (inallgroup=client and copies=client:2) and " ++ preferredContent ClientGroup
preferredContent BackupGroup = "include=*"
-preferredContent IncrementalBackupGroup = lastResort $
+preferredContent IncrementalBackupGroup = lastResort
"include=* and (not copies=incrementalbackup:1)"
preferredContent SmallArchiveGroup = lastResort $
"(include=*/archive/* or include=archive/*) and " ++ preferredContent FullArchiveGroup
-preferredContent FullArchiveGroup = lastResort $
+preferredContent FullArchiveGroup = lastResort
"not (copies=archive:1 or copies=smallarchive:1)"
preferredContent SourceGroup = "not (copies=1)"
-preferredContent ManualGroup = lastResort $
+preferredContent ManualGroup = lastResort
"present and exclude=*/archive/* and exclude=archive/*"
preferredContent UnwantedGroup = "exclude=*"