diff options
Diffstat (limited to 'XMonad/Actions/DynamicWorkspaces.hs')
| -rw-r--r-- | XMonad/Actions/DynamicWorkspaces.hs | 9 |
1 files changed, 2 insertions, 7 deletions
diff --git a/XMonad/Actions/DynamicWorkspaces.hs b/XMonad/Actions/DynamicWorkspaces.hs index 4b8156b..893dbf7 100644 --- a/XMonad/Actions/DynamicWorkspaces.hs +++ b/XMonad/Actions/DynamicWorkspaces.hs @@ -28,8 +28,8 @@ module XMonad.Actions.DynamicWorkspaces ( import XMonad hiding (workspaces) import XMonad.StackSet hiding (filter, modify, delete) -import XMonad.Prompt.Workspace -import XMonad.Prompt ( XPConfig, mkXPrompt, XPrompt(..) ) +import XMonad.Prompt.Workspace ( Wor(Wor), workspacePrompt ) +import XMonad.Prompt ( XPConfig, mkXPrompt ) import XMonad.Util.WorkspaceCompare ( getSortByIndex ) import Data.List (find) import Data.Maybe (isNothing) @@ -61,11 +61,6 @@ import Control.Monad (when) -- "XMonad.Actions.CopyWindow", 'windows', 'shift', and 'defaultXPConfig'. -data Wor = Wor String - -instance XPrompt Wor where - showXPrompt (Wor x) = x - mkCompl :: [String] -> String -> IO [String] mkCompl l s = return $ filter (\x -> take (length s) x == s) l |