diff options
| author | Josh Rahm <joshuarahm@gmail.com> | 2022-04-24 20:34:51 -0600 |
|---|---|---|
| committer | Josh Rahm <joshuarahm@gmail.com> | 2022-10-09 12:19:46 -0600 |
| commit | 8e2cb3d0e92dd8c09233705471f87d4d582eedfe (patch) | |
| tree | 0f2bcdf6074b6a8f696c53efb0a83bdd53460275 /src/Rahm/Desktop/Layout | |
| parent | 92deb70d1268317e3b80c8c28e0358f0c9064f3e (diff) | |
| download | rde-8e2cb3d0e92dd8c09233705471f87d4d582eedfe.tar.gz rde-8e2cb3d0e92dd8c09233705471f87d4d582eedfe.tar.bz2 rde-8e2cb3d0e92dd8c09233705471f87d4d582eedfe.zip | |
Add R.D.StackSet as a replacement for StackSet.
Diffstat (limited to 'src/Rahm/Desktop/Layout')
| -rw-r--r-- | src/Rahm/Desktop/Layout/ConsistentMosaic.hs | 2 | ||||
| -rw-r--r-- | src/Rahm/Desktop/Layout/CornerLayout.hs | 2 | ||||
| -rw-r--r-- | src/Rahm/Desktop/Layout/Draw.hs | 2 | ||||
| -rw-r--r-- | src/Rahm/Desktop/Layout/Hole.hs | 2 | ||||
| -rw-r--r-- | src/Rahm/Desktop/Layout/List.hs | 2 | ||||
| -rw-r--r-- | src/Rahm/Desktop/Layout/Pop.hs | 2 | ||||
| -rw-r--r-- | src/Rahm/Desktop/Layout/Redescribe.hs | 2 |
7 files changed, 7 insertions, 7 deletions
diff --git a/src/Rahm/Desktop/Layout/ConsistentMosaic.hs b/src/Rahm/Desktop/Layout/ConsistentMosaic.hs index a84a2f1..0a6215a 100644 --- a/src/Rahm/Desktop/Layout/ConsistentMosaic.hs +++ b/src/Rahm/Desktop/Layout/ConsistentMosaic.hs @@ -6,7 +6,7 @@ module Rahm.Desktop.Layout.ConsistentMosaic where import XMonad -import qualified XMonad.StackSet as W +import qualified Rahm.Desktop.StackSet as W import qualified Data.Map as Map import Data.Map (Map) import Data.Maybe (mapMaybe) diff --git a/src/Rahm/Desktop/Layout/CornerLayout.hs b/src/Rahm/Desktop/Layout/CornerLayout.hs index f0952c7..7cf4421 100644 --- a/src/Rahm/Desktop/Layout/CornerLayout.hs +++ b/src/Rahm/Desktop/Layout/CornerLayout.hs @@ -4,7 +4,7 @@ module Rahm.Desktop.Layout.CornerLayout where import Data.Typeable (Typeable) import XMonad (LayoutClass(..), Rectangle(..), Resize(..), fromMessage) -import qualified XMonad.StackSet as S +import qualified Rahm.Desktop.StackSet as S data Corner a = Corner Rational Rational deriving (Show, Typeable, Read) diff --git a/src/Rahm/Desktop/Layout/Draw.hs b/src/Rahm/Desktop/Layout/Draw.hs index 165af75..ff90b9e 100644 --- a/src/Rahm/Desktop/Layout/Draw.hs +++ b/src/Rahm/Desktop/Layout/Draw.hs @@ -27,7 +27,7 @@ import XMonad (X, SomeMessage(..)) import qualified XMonad as X -import qualified XMonad.StackSet as S +import qualified Rahm.Desktop.StackSet as S -- Draws and returns an XPM for the current layout. -- diff --git a/src/Rahm/Desktop/Layout/Hole.hs b/src/Rahm/Desktop/Layout/Hole.hs index 3f7c9b7..f6632d5 100644 --- a/src/Rahm/Desktop/Layout/Hole.hs +++ b/src/Rahm/Desktop/Layout/Hole.hs @@ -3,7 +3,7 @@ -- Delegates to a lower layout, but leaves a hole where the next window will go. module Rahm.Desktop.Layout.Hole (hole, toggleHole) where -import qualified XMonad.StackSet as W +import qualified Rahm.Desktop.StackSet as W import XMonad import Data.Maybe (mapMaybe) diff --git a/src/Rahm/Desktop/Layout/List.hs b/src/Rahm/Desktop/Layout/List.hs index 77b53c9..d6ab6ba 100644 --- a/src/Rahm/Desktop/Layout/List.hs +++ b/src/Rahm/Desktop/Layout/List.hs @@ -30,7 +30,7 @@ import Data.Proxy import Data.Void import GHC.TypeLits import XMonad -import qualified XMonad.StackSet as W +import qualified Rahm.Desktop.StackSet as W -- Type-level lists. LNil is the final of the list. LCons contains a layout and a -- tail. diff --git a/src/Rahm/Desktop/Layout/Pop.hs b/src/Rahm/Desktop/Layout/Pop.hs index e06ff25..a7e2762 100644 --- a/src/Rahm/Desktop/Layout/Pop.hs +++ b/src/Rahm/Desktop/Layout/Pop.hs @@ -15,7 +15,7 @@ module Rahm.Desktop.Layout.Pop ( import XMonad import XMonad.Layout.LayoutModifier (LayoutModifier(..), ModifiedLayout(..)) import Data.Default (Default(..)) -import qualified XMonad.StackSet as W +import qualified Rahm.Desktop.StackSet as W import Rahm.Desktop.Layout.ReinterpretMessage diff --git a/src/Rahm/Desktop/Layout/Redescribe.hs b/src/Rahm/Desktop/Layout/Redescribe.hs index 036bc88..7f955d8 100644 --- a/src/Rahm/Desktop/Layout/Redescribe.hs +++ b/src/Rahm/Desktop/Layout/Redescribe.hs @@ -6,7 +6,7 @@ module Rahm.Desktop.Layout.Redescribe where import XMonad -import qualified XMonad.StackSet as W +import qualified Rahm.Desktop.StackSet as W import Data.Typeable (Typeable) -- Type-class to modify the description of a layout. |