From f640202a26e5484f3f8f4cb4bf64be963eec1e77 Mon Sep 17 00:00:00 2001 From: Ivan Malison Date: Tue, 29 Nov 2016 15:46:51 -0800 Subject: [PATCH] [XMonad] Add two argument compose --- dotfiles/xmonad/xmonad.hs | 2 ++ 1 file changed, 2 insertions(+) diff --git a/dotfiles/xmonad/xmonad.hs b/dotfiles/xmonad/xmonad.hs index 93284f0b..64c0d13e 100644 --- a/dotfiles/xmonad/xmonad.hs +++ b/dotfiles/xmonad/xmonad.hs @@ -77,6 +77,8 @@ main = -- Utility functions +(<..>) a b = (fmap . fmap) a b + forkM :: Monad m => (i -> m a) -> (i -> m b) -> i -> m (a, b) forkM a b input = do resA <- a input