Cleanup

src/Dodge/SelectionSections/Draw.hs

@@ -16,7 +16,7 @@ import Picture.Base
 drawSelectionSections ::
     IM.IntMap (SelectionSection a) ->
     ListDisplayParams ->
-    Configuration ->
+    Config ->
     Picture
 drawSelectionSections sss ldp cfig =
     translateScreenPos cfig (ldp ^. ldpPos) $
@@ -36,7 +36,7 @@ drawSSCursor ::
     IM.IntMap (SelectionSection a) ->
     ListDisplayParams ->
     CursorDisplay ->
-    Configuration ->
+    Config ->
     Maybe (Int, Int) ->
     Picture
 drawSSCursor sss ldp curs cfig =
@@ -49,7 +49,7 @@ drawSSMultiCursor ::
     Maybe Int ->
     ListDisplayParams ->
     CursorDisplay ->
-    Configuration ->
+    Config ->
     Picture
 drawSSMultiCursor sss msel mextra ldp curs cfig = translateScreenPos cfig (ldp ^. ldpPos)
     . fold