Add linkStatic
commit2aa1764208dc8c574db821ec9cf3b997beadae7b
authorAli Abrar <aliabrar@gmail.com>
dateMon 5 Nov 2018, 00:48 (8 years ago)
parented6ffff
src/Reflex/Vty/Widget/Input.hs+7
@@ -61,3 +61,10 @@ link t = do
6161 }
6262 richText cfg t
6363 mouseUp
64+
65+-- | A clickable link widget with a static label
66+linkStatic
67+ :: (Reflex t, Monad m)
68+ => Text
69+ -> VtyWidget t m (Event t MouseUp)
70+linkStatic = link . pure