xmonad.hs:27:28: error:
    Variable not in scope: formatTime :: t0 -> [Char] -> a10 -> [Char]
   |
27 |        date <- io $ liftM (formatTime defaultTimeLocale "[%Y-%m-%d %H:%M] ") getZonedTime
   |                            ^^^^^^^^^^

xmonad.hs:27:39: error: Variable not in scope: defaultTimeLocale
   |
27 |        date <- io $ liftM (formatTime defaultTimeLocale "[%Y-%m-%d %H:%M] ") getZonedTime
   |                                       ^^^^^^^^^^^^^^^^^

xmonad.hs:27:78: error:
    Variable not in scope: getZonedTime :: IO a10
   |
27 |        date <- io $ liftM (formatTime defaultTimeLocale "[%Y-%m-%d %H:%M] ") getZonedTime
   |                                                                              ^^^^^^^^^^^^