Implement simple indenting in selection menu

src/Dodge/Render/List.hs

@@ -12,7 +12,6 @@ module Dodge.Render.List (
     listCursorChooseBorderScale,
 ) where
 
-import Dodge.Data.DoubleTree
 import Dodge.SelectionSections
 import Data.Maybe
 import Dodge.Base.Window
@@ -76,9 +75,6 @@ getLDPWidth ldps = case _ldpWidth ldps of
 drawListYoff :: Int -> [Picture] -> Picture
 drawListYoff = drawListYgapScaleYoff 0 1
 
-drawTreeYgapScaleYoff :: Float -> Float -> Int -> DoubleTree [Picture] -> Picture
-drawTreeYgapScaleYoff ygap s i = undefined
-
 drawListYgapScaleYoff :: Float -> Float -> Int -> [Picture] -> Picture
 drawListYgapScaleYoff ygap s i = mconcat . zipWith (drawListElement ygap s 0) [i ..]