<div dir="ltr"><div class="gmail_extra"><div class="gmail_quote">On Thu, Dec 3, 2015 at 8:37 AM, "Peter Krauß" <span dir="ltr"><<a href="mailto:cocii@gmx.de" target="_blank">cocii@gmx.de</a>></span> wrote:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div><div style="font-family:Verdana;font-size:12.0px"><div>Hello!</div>

<div> </div>

<div>I would like to mimic Window's Alt+Tab behaviour in XMonad on a per-workspace basis: Pressing Alt+Tab should focus the window on the current workspace, that most recently had the focus on that workspace.</div>

<div>I can use GroupNavigation's "nextMatch History (return True)" but then it also switches workspaces. I would need something like:</div>

<div>
<pre style="margin-top:0.8em;margin-bottom:0.8em;padding:0.25em;line-height:16.12px;overflow:auto;border-bottom-width:0.25em;border-bottom-style:solid;border-bottom-color:white;background:rgb(229,237,244)">nextMatch History  (window's workspace == current workspace)</pre>

<div> </div>

<div>Sadly I am not a Haskell guy, so I can not figure out how to create such a query for. Could someone help me? Or maybe tell me if there is a more easy solution?</div></div></div></div></blockquote></div><div class="gmail_extra"><br></div><font face="monospace, monospace"><div class="gmail_extra"><font face="monospace, monospace"><br></font></div>sameWorkspace = do</font></div><div class="gmail_extra"><font face="monospace, monospace">  nw <- ask -- window being matched against</font></div><div class="gmail_extra"><font face="monospace, monospace">  liftX $ do</font></div><div class="gmail_extra"><font face="monospace, monospace">    ws <- gets windowset</font></div><div class="gmail_extra"><font face="monospace, monospace">    return $ maybe False (== currentTag ws) (findTag nw ws)</font></div><div class="gmail_extra"><br></div><div class="gmail_extra"><br></div><div class="gmail_extra">-- <br><div class="gmail_signature"><div dir="ltr"><div>brandon s allbery kf8nh                               sine nomine associates</div><div><a href="mailto:allbery.b@gmail.com" target="_blank">allbery.b@gmail.com</a>                                  <a href="mailto:ballbery@sinenomine.net" target="_blank">ballbery@sinenomine.net</a></div><div>unix, openafs, kerberos, infrastructure, xmonad        <a href="http://sinenomine.net" target="_blank">http://sinenomine.net</a></div></div></div>
</div></div>