|
11 | 11 | -----------------------------------------------------------------------------
|
12 | 12 | -- |
|
13 | 13 | -- Module : XMonad.Layout.DecorationEx.Engine
|
14 |
| --- Description : Type class and it's default implementation for window decoration engines. |
| 14 | +-- Description : Type class and its default implementation for window decoration engines. |
15 | 15 | -- Copyright : (c) 2007 Andrea Rossato, 2009 Jan Vornberger, 2023 Ilya Portnov
|
16 | 16 | -- License : BSD-style (see xmonad/LICENSE)
|
17 | 17 | --
|
@@ -83,8 +83,8 @@ class (Read (engine widget a), Show (engine widget a),
|
83 | 83 | => DecorationEngine engine widget a where
|
84 | 84 |
|
85 | 85 | -- | Type of themes used by decoration engine.
|
86 |
| - -- This type must be parametrized over widget type, |
87 |
| - -- because theme will contain a list of widgets. |
| 86 | + -- This type must be parameterized over a widget type, |
| 87 | + -- because a theme will contain a list of widgets. |
88 | 88 | type Theme engine :: Type -> Type
|
89 | 89 |
|
90 | 90 | -- | Type of data used by engine as a context during painting;
|
@@ -259,7 +259,7 @@ class (Read (engine widget a), Show (engine widget a),
|
259 | 259 | -- | This hoook is called after a window has been dragged using the decoration.
|
260 | 260 | -- This is called from default implementation of "decorationEventHookEx".
|
261 | 261 | decorationAfterDraggingHook :: engine widget a -- ^ Decoration engine instance
|
262 |
| - -> (Window, Rectangle) -- ^ Original window and it's rectangle |
| 262 | + -> (Window, Rectangle) -- ^ Original window and its rectangle |
263 | 263 | -> Window -- ^ Decoration window
|
264 | 264 | -> X ()
|
265 | 265 | decorationAfterDraggingHook _ds (w, _r) decoWin = do
|
@@ -375,7 +375,7 @@ alignCenter engine dd widgets = do
|
375 | 375 | place' = place {wpRectangle = rect'}
|
376 | 376 | in place' : pack remaining places
|
377 | 377 |
|
378 |
| --- | Build an instance of DrawData type. |
| 378 | +-- | Build an instance of 'DrawData' type. |
379 | 379 | mkDrawData :: (DecorationEngine engine widget a, ThemeAttributes (Theme engine widget), HasWidgets (Theme engine) widget)
|
380 | 380 | => engine widget a
|
381 | 381 | -> Theme engine widget -- ^ Decoration theme
|
|
0 commit comments