Tweak scrolling, particularly zooming

2023-01-07 19:50:44 +00:00
parent 6b259fa200
commit d4122b2d6f
7 changed files with 42 additions and 37 deletions
@@ -15,11 +15,6 @@ data HeldScroll
    | HeldScrollZoom
    | HeldScrollCharMode
        {_hsCharMode :: Seq.Seq Char}
-    | HeldScrollInt
-        { _hsInt :: Int
-        , _hsMaxInt :: Int
-        }
-    | HeldScrollTime
    deriving (Eq, Ord, Show, Read) --Generic, Flat)

 makeLenses ''HeldScroll