diff --git a/dotfiles/xmonad/xmonad.hs b/dotfiles/xmonad/xmonad.hs
index 2a615db0..bd8db231 100644
--- a/dotfiles/xmonad/xmonad.hs
+++ b/dotfiles/xmonad/xmonad.hs
@@ -104,12 +104,14 @@ instance Transformer MyToggles Window where
     transform MAGICFOCUS x k = k (magicFocus x) unmodifyLayout
 
 myToggles = [LIMIT, GAPS, MAGICFOCUS]
+otherToggles = [FULL, MIRROR]
 
-togglesMap = M.fromList [(show toggle, toggle) | toggle <- myToggles]
+togglesMap = M.fromList $ [ (show toggle, Toggle toggle) | toggle <- myToggles ] ++
+             [ (show toggle, Toggle toggle) | toggle <- otherToggles ]
 
 selectToggle = do
   Just selectedToggle <- DM.menuMapArgs "rofi" ["-dmenu", "-i"] togglesMap
-  sendMessage $ Toggle selectedToggle
+  sendMessage selectedToggle
 
 -- Layout setup