aboutsummaryrefslogtreecommitdiffstats
path: root/XMonad.hs
diff options
context:
space:
mode:
authorDavid Roundy <droundy@darcs.net>2007-08-20 13:36:58 +0200
committerDavid Roundy <droundy@darcs.net>2007-08-20 13:36:58 +0200
commita8f08efc150a0062125c89f423b3c9c572f9ce36 (patch)
tree4456651582bf01cf1858f15dd8ed75650961dac8 /XMonad.hs
parent7212622c6e2e5f5f6e423e054cf6a666e2e69dc3 (diff)
downloadxmonad-a8f08efc150a0062125c89f423b3c9c572f9ce36.tar.gz
xmonad-a8f08efc150a0062125c89f423b3c9c572f9ce36.tar.xz
xmonad-a8f08efc150a0062125c89f423b3c9c572f9ce36.zip
switch WorkspaceId to String.
darcs-hash:20070820113658-72aca-f27e89526a320a9426a359cd88a4a74567283417.gz
Diffstat (limited to 'XMonad.hs')
-rw-r--r--XMonad.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/XMonad.hs b/XMonad.hs
index 967a10f..d0ddca3 100644
--- a/XMonad.hs
+++ b/XMonad.hs
@@ -15,7 +15,7 @@
-----------------------------------------------------------------------------
module XMonad (
- X, WindowSet, WorkspaceId(..), ScreenId(..), ScreenDetail(..), XState(..), XConf(..), Layout(..),
+ X, WindowSet, WorkspaceId, ScreenId(..), ScreenDetail(..), XState(..), XConf(..), Layout(..),
Typeable, Message, SomeMessage(..), fromMessage, runLayout,
runX, catchX, io, catchIO, withDisplay, withWindowSet, isRoot, spawn, restart, trace, whenJust, whenX,
atom_WM_STATE, atom_WM_PROTOCOLS, atom_WM_DELETE_WINDOW
@@ -55,7 +55,7 @@ data XConf = XConf
type WindowSet = StackSet WorkspaceId Window ScreenId ScreenDetail
-- | Virtual workspace indicies
-newtype WorkspaceId = W Int deriving (Eq,Ord,Show,Read,Enum,Num,Integral,Real)
+type WorkspaceId = String
-- | Physical screen indicies
newtype ScreenId = S Int deriving (Eq,Ord,Show,Read,Enum,Num,Integral,Real)