Make transitive bumps into D (level 3) bumps

silkapp · Feb 26, 2014 · 8180aa1 · 8180aa1
1 parent d9f4a5e
commit 8180aa1
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/Bumper.hs b/src/Bumper.hs
@@ -69,7 +69,7 @@ trans ps = fix (transStep ps)
 transStep :: Packages -> Changes -> Changes
 transStep ps old = new <.> old
   where deps = filter (not . null . dependencyUpdates old) ps
-        new  = M.fromList . map (\p -> (get name p, bumpPosition 2 (get version p))) $ deps
+        new  = M.fromList . map (\p -> (get name p, bumpPosition 3 (get version p))) $ deps
 
 fix :: (Eq a) => (a -> a) -> a -> a
 fix f a | b == a    = a