@@ -54,7 +54,7 @@ run config verbosity rules = do
54 provider <- newProvider store (shouldIgnoreFile config) $
54 provider <- newProvider store (shouldIgnoreFile config) $
55 providerDirectory config
55 providerDirectory config
56 Logger.message logger "Running rules..."
56 Logger.message logger "Running rules..."
57− ruleSet <- runRules (internalRules >> rules) provider
57+ ruleSet <- runRules (rules >> internalRules) provider
59 -- Get old facts
59 -- Get old facts
60 mOldFacts <- Store.get store factsKey
60 mOldFacts <- Store.get store factsKey