diff --git a/LICENSE b/LICENSE
--- a/LICENSE
+++ b/LICENSE
@@ -1,6 +1,6 @@
 MIT License
 
-Copyright (c) 2018-2021 Patryk Kocielnik
+Copyright (c) 2018-2022 Patryk Kocielnik
 
 Permission is hereby granted, free of charge, to any person obtaining a copy
 of this software and associated documentation files (the "Software"), to deal
diff --git a/Monadoro.cabal b/Monadoro.cabal
--- a/Monadoro.cabal
+++ b/Monadoro.cabal
@@ -5,7 +5,7 @@
 -- see: https://github.com/sol/hpack
 
 name:           Monadoro
-version:        0.2.6.0
+version:        0.2.6.2
 synopsis:       A minimalistic CLI Pomodoro timer.
 description:    A Pomodoro timer with two modes: single-pomodoro (default), and four-pomodoro (`--session`).
 category:       Tools
@@ -26,6 +26,7 @@
 
 library
   exposed-modules:
+      ConsoleDisplay
       CountdownLoop
       ParseTime
       Pomodoro
diff --git a/changelog b/changelog
--- a/changelog
+++ b/changelog
@@ -1,3 +1,12 @@
+monadoro (2.6.2)
+
+	* Fix surprising output on `stack test`.
+
+	  There were identical lines of output occurring multiple times without a
+	  clear reason.
+
+	  Fixed by bumping the resolver used to 19.9 LTS.
+
 monadoro (2.6.0)
 
 	* Filter invalid time intervals from input.
diff --git a/src/ConsoleDisplay.lhs b/src/ConsoleDisplay.lhs
new file mode 100644
--- /dev/null
+++ b/src/ConsoleDisplay.lhs
@@ -0,0 +1,21 @@
+#!/usr/bin/env stack
+> --stack --install-ghc runghc
+
+Unified interface for displaying the remaining time on the screen.
+
+> module ConsoleDisplay (display) where
+>
+> import Control.Concurrent  (threadDelay)
+> import System.Console.ANSI (clearLine,
+>                             saveCursor,
+>                             restoreCursor)
+>
+> display :: String -> IO ()
+> display s = putStr $ "\r" ++ s
+>
+> waitASecond :: IO()
+> waitASecond = threadDelay $ 10^6
+
+> main :: IO ()
+> main = do
+>     display "00:01" >> waitASecond >> display "00:00"
diff --git a/test/DocTests.hs b/test/DocTests.hs
--- a/test/DocTests.hs
+++ b/test/DocTests.hs
@@ -3,8 +3,11 @@
 import Test.DocTest
 
 main :: IO ()
-main = doctest ["-isrc",
-                "app/Main.hs",
-                "src/ParseTime.lhs",
-                "src/CountdownLoop.hs",
-                "src/Pomodoro.lhs"]
+main = doctest [
+        "-isrc",
+        "app/Main.hs",
+        "src/ParseTime.lhs",
+        "src/CountdownLoop.hs",
+        "src/Pomodoro.lhs",
+        "src/ConsoleDisplay.lhs"
+    ]