From bdc2567c9fa936179a57f77750fec6db1de505e7 Mon Sep 17 00:00:00 2001
From: Josh Rahm <rahm@google.com>
Date: Fri, 7 Feb 2020 15:16:03 -0700
Subject: Add accordion and circle layouts

---
 src/Internal/Layout.hs | 4 ++++
 1 file changed, 4 insertions(+)

(limited to 'src/Internal/Layout.hs')

diff --git a/src/Internal/Layout.hs b/src/Internal/Layout.hs
index 57102c6..b071e74 100644
--- a/src/Internal/Layout.hs
+++ b/src/Internal/Layout.hs
@@ -1,6 +1,8 @@
 {-# LANGUAGE MultiParamTypeClasses, FlexibleInstances #-}
 module Internal.Layout where 
 
+import XMonad.Layout.Circle
+import XMonad.Layout.Accordion
 import Control.Applicative
 import XMonad.Layout.Spacing
 import Data.List
@@ -20,6 +22,8 @@ myLayout =
       spiral (6/7) |||
       Tall 1 (3/100) (1/2) |||
       ThreeCol 1 (3/100) (1/2) |||
+      Circle |||
+      Accordion ||| 
       Grid
 
 data ResizeZoom = ShrinkZoom | ExpandZoom deriving (Typeable)
-- 
cgit