diff options
Diffstat (limited to 'src/Main.hs')
| -rw-r--r-- | src/Main.hs | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/src/Main.hs b/src/Main.hs index 5c1a4e0..17f6207 100644 --- a/src/Main.hs +++ b/src/Main.hs @@ -29,6 +29,7 @@ import qualified XMonad as X import qualified XMonad.StackSet as W main = do + putStrLn "Welcome To RDE!" -- Execute some commands. homeDir <- getHomeDirectory @@ -80,8 +81,8 @@ main = do changeHook :: Location -> Location -> X () -changeHook l1 l2 = do - logs $ printf "Change %s -> %s" (show l1) (show l2) +changeHook l1 l2 = + logs Info "Change %s -> %s" (show l1) (show l2) doCenterFloat :: ManageHook doCenterFloat = |