diff options
Diffstat (limited to '')
-rw-r--r-- | DragPane.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/DragPane.hs b/DragPane.hs index 38445c0..f90a5be 100644 --- a/DragPane.hs +++ b/DragPane.hs @@ -63,7 +63,7 @@ data DragPane a = data DragType = Horizontal | Vertical deriving ( Show, Read ) -instance Layout DragPane Window where +instance LayoutClass DragPane Window where doLayout d@(DragPane _ Vertical _ _) = doLay id d doLayout d@(DragPane _ Horizontal _ _) = doLay mirrorRect d handleMessage = handleMess |