From c11a6e9d11b994cc23aa096ff85c31c7a881283b Mon Sep 17 00:00:00 2001 From: "sean.escriva" Date: Mon, 28 Sep 2009 22:44:43 +0200 Subject: minor hlint cleanup of Prompt and XMonad.Prompt.* sub-modules Ignore-this: 25e71f59bdcc5bf94c2d6f476833216b darcs-hash:20090928204443-29414-d1844586f2955c8b76d971b20d6e2b6c1ea91d4d.gz --- XMonad/Prompt/Window.hs | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'XMonad/Prompt/Window.hs') diff --git a/XMonad/Prompt/Window.hs b/XMonad/Prompt/Window.hs index 8130eaf..8fe9b7b 100644 --- a/XMonad/Prompt/Window.hs +++ b/XMonad/Prompt/Window.hs @@ -68,9 +68,9 @@ instance XPrompt WindowPrompt where nextCompletion _ = getNextCompletion windowPromptGoto, windowPromptBring, windowPromptBringCopy :: XPConfig -> X () -windowPromptGoto c = doPrompt Goto c -windowPromptBring c = doPrompt Bring c -windowPromptBringCopy c = doPrompt BringCopy c +windowPromptGoto = doPrompt Goto +windowPromptBring = doPrompt Bring +windowPromptBringCopy = doPrompt BringCopy -- | Pops open a prompt with window titles. Choose one, and you will be -- taken to the corresponding workspace. @@ -94,4 +94,4 @@ doPrompt t c = do -- | Brings a copy of the specified window into the current workspace. bringCopyWindow :: Window -> WindowSet -> WindowSet -bringCopyWindow w ws = copyWindow w (W.currentTag $ ws) ws +bringCopyWindow w ws = copyWindow w (W.currentTag ws) ws -- cgit v1.2.3