diff options
Diffstat (limited to 'Operations.hs')
-rw-r--r-- | Operations.hs | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/Operations.hs b/Operations.hs index 0edfbb9..5b3bb2d 100644 --- a/Operations.hs +++ b/Operations.hs @@ -369,10 +369,10 @@ data ChangeLayout = NextLayout | PrevLayout | JumpToLayout String instance Message ChangeLayout instance ReadableLayout Window where - defaults = Layout (Select []) : - Layout Full : Layout (Tall 1 0.1 0.5) : - Layout (Mirror $ Tall 1 0.1 0.5) : - serialisedLayouts + readTypes = Layout (Select []) : + Layout Full : Layout (Tall 1 0.1 0.5) : + Layout (Mirror $ Tall 1 0.1 0.5) : + serialisedLayouts data Select a = Select [Layout a] deriving (Show, Read) |