diff --git a/Setup.hs b/Setup.hs
deleted file mode 100644
--- a/Setup.hs
+++ /dev/null
@@ -1,2 +0,0 @@
-import Distribution.Simple
-main = defaultMain
diff --git a/simple-ui.cabal b/simple-ui.cabal
--- a/simple-ui.cabal
+++ b/simple-ui.cabal
@@ -1,5 +1,5 @@
 name:               simple-ui
-version:            0.1.1
+version:            0.1.2
 cabal-version:      >=1.22
 build-type:         Simple
 author:             Piotr Borek <piotrborek@op.pl>
@@ -29,11 +29,11 @@
         mtl                (>= 2.2 && < 2.3),
         exceptions         (>= 0.8 && < 0.11),
         vty                (>= 5.16 && < 6),
-        lens               (>= 4.15 && < 4.17),
+        lens               (>= 4.15 && < 4.18),
         vector             (>= 0.11 && < 0.13),
         data-default-class (>= 0.1 && < 0.2),
-        template-haskell   (>= 2.11 && < 2.14),
-        stm                (>= 2.4 && < 2.5)
+        template-haskell   (>= 2.11 && < 2.15),
+        stm                (>= 2.4 && < 2.6)
 
     exposed-modules:
         Simple.UI.All
diff --git a/src/Simple/UI/Widgets/TextListView.hs b/src/Simple/UI/Widgets/TextListView.hs
--- a/src/Simple/UI/Widgets/TextListView.hs
+++ b/src/Simple/UI/Widgets/TextListView.hs
@@ -233,6 +233,12 @@
         Vty.KPageDown ->
             forM_ ([1..height `div` 2] :: [Int]) $ const (goDown textListView)
 
+        Vty.KHome ->
+            goHome textListView
+        
+        Vty.KEnd ->
+            goEnd textListView
+
         Vty.KEnter -> do
             pos <- get textListView _textListViewPos
             when (pos >= 0) $ do
@@ -275,3 +281,18 @@
             hasItem <- hasNthItem textListView (pos + yOffset + 1)
             when hasItem $
                 modify textListView _textListViewYOffset succ
+
+goHome :: TextListView a -> UIApp u ()
+goHome textListView = do
+    set textListView _textListViewPos 0
+    set textListView _textListViewYOffset 0
+
+goEnd :: TextListView a -> UIApp u ()
+goEnd textListView = do
+    pos <- get textListView _textListViewPos
+    yOffset <- get textListView _textListViewYOffset
+    goDown textListView
+    pos' <- get textListView _textListViewPos
+    yOffset' <- get textListView _textListViewYOffset
+    when (pos + yOffset /= pos' + yOffset') $
+        goEnd textListView
diff --git a/stack.yaml b/stack.yaml
--- a/stack.yaml
+++ b/stack.yaml
@@ -1,4 +1,4 @@
-resolver: lts-9.21
+resolver: lts-13.18
 packages:
 - '.'
 flags: {}