Improve rule description master
authorJoachim Breitner <mail@joachim-breitner.de>
Fri, 6 Sep 2013 22:10:14 +0000 (00:10 +0200)
committerJoachim Breitner <mail@joachim-breitner.de>
Fri, 6 Sep 2013 22:10:14 +0000 (00:10 +0200)
TransRules.hs

index 2e5c77f..2a989eb 100644 (file)
@@ -133,7 +133,7 @@ transitionRules config ai unstable testing general builtBy hr nc f x = (toProduc
             ] 
         uniqueBin = 
             -- At most one binary per name and architecture
-            [AtMostOne (nub pkgs) ("at most version of " ++ show name ++ " ought to be unique on " ++ show arch) |
+            [AtMostOne (nub pkgs) ("the package " ++ show name ++ " ought to be unique on " ++ show arch) |
                 ((name,arch),pkgs') <- M.toList binariesBoth,
                 let pkgs = map genIndex (nub pkgs'),
                 length pkgs > 1