September 2011 - xmonad

Issue 413 in xmonad: Windows don't disappear
by codesite-noreply＠google.com 06 Mar '14

06 Mar '14

Status: New Owner: ---- New issue 413 by srburnet: Windows don't disappear http://code.google.com/p/xmonad/issues/detail?id=413 What steps will reproduce the problem? 1. Open a window (e.g., a terminal, although it happens to all types of windows) 2. Do a bunch of other work with other windows. (This doesn't happen if you open and close a window immediately). 3. Close the original window. What is the expected output? What do you see instead? The window should disappear and the wallpaper should be shown. Instead, an artifact image of the window remains, although the window itself has definitely closed. I can't interact with the window and if open a new window xmonad behaves as if there is no additional window (the screen isn't split between the two windows). I can even drag a small window around in tiling mode over the image of the window and "erase" the closed window (i.e., the wallpaper is redrawn in areas touched by the window). I've attached a screenshot that hopefully makes sense. Note that the problem is very rare. There doesn't seem to be a pattern for which windows have the problem. What version of the product are you using? On what operating system? xmonad darcs, on Arch Linux. I am using the NVIDIA proprietary drivers with dual monitors (Twinview). I am not using compositing. The problem has occured with multiple versions of xmonad, the kernel versions, and the NVIDIA driver. Are you using an xmonad.hs? Please attach it and the output of "xmonad --recompile". xmonad --recompile yields no output. Attachments: xmonad.hs 5.2 KB bug.png 741 KB

1 9

Re: Issue 200 in xmonad: xmonad spins in a tight loop changing focus back and forth
by codesite-noreply＠google.com 05 Mar '14

05 Mar '14

Comment #11 on issue 200 by wapcaplet88: xmonad spins in a tight loop changing focus back and forth http://code.google.com/p/xmonad/issues/detail?id=200 Same issue here, on Gentoo with xmonad-0.9 and openoffice-bin-3.2.0. Adding 'export SAL_USE_VCLPLUGIN=gen' to ~/.xsession worked a treat!

1 15

better combineTwoP and Property
by proxym 18 Jan '14

18 Jan '14

I modified combineTwoP and Property. http://hpaste.org/45435/combinetwoqb New name is combineTwoQB Now windows use full screen space always! (It was bug in combineTwoP, when all windows are in one pane only) Now you can use IsDialog property to detect dialog windows. Version with simplified config: http://hpaste.org/45439/combinetwoqb data Property = Title String | ClassName String | Resource String | Role String -- ^ WM_WINDOW_ROLE property | Machine String -- ^ WM_CLIENT_MACHINE property | And Property Property | Or Property Property | Not Property | IsDialog -- ^^^^^ _NET_WM_WINDOW_TYPE _NET_WM_WINDOW_TYPE_DIALOG | AtomProperty String String | Const Bool deriving (Read, Show) infixr 9 `And` infixr 8 `Or` -- | Does given window have this property? hasProperty :: Property -> Window -> X Bool hasProperty (Title s) w = withDisplay $ \d -> fmap (Just s ==) $ io $ fetchName d w hasProperty (Resource s) w = withDisplay $ \d -> fmap ((==) s . resName ) $ io $ getClassHint d w hasProperty (ClassName s) w = withDisplay $ \d -> fmap ((==) s . resClass) $ io $ getClassHint d w hasProperty (Role s) w = withDisplay $ \d -> fmap ((==) (Just s)) $ getStringProperty d w "WM_WINDOW_ROLE" hasProperty (Machine s) w = withDisplay $ \d -> fmap ((==) (Just s)) $ getStringProperty d w "WM_CLIENT_MACHINE" hasProperty (IsDialog) w = hasProperty (AtomProperty "_NET_WM_WINDOW_TYPE" "_NET_WM_WINDOW_TYPE_DIALOG") w hasProperty (AtomProperty sKey sValue) w = withDisplay $ \d -> checkAtomProperty d w sKey sValue hasProperty (And p1 p2) w = do { r1 <- hasProperty p1 w; r2 <- hasProperty p2 w; return $ r1 && r2 } hasProperty (Or p1 p2) w = do { r1 <- hasProperty p1 w; r2 <- hasProperty p2 w; return $ r1 || r2 } hasProperty (Not p1) w = do { r1 <- hasProperty p1 w; return $ not r1 } hasProperty (Const b) _ = return b -- | Does the focused window have this property? focusedHasProperty :: Property -> X Bool focusedHasProperty p = do ws <- gets windowset let ms = W.stack $ W.workspace $ W.current ws case ms of Just s -> hasProperty p $ W.focus s Nothing -> return False -- | Find all existing windows with specified property allWithProperty :: Property -> X [Window] allWithProperty prop = withDisplay $ \dpy -> do rootw <- asks theRoot (_,_,wins) <- io $ queryTree dpy rootw hasProperty prop `filterM` wins -- | Convert property to 'Query' 'Bool' (see "XMonad.ManageHook") propertyToQuery :: Property -> Query Bool propertyToQuery (Title s) = title =? s propertyToQuery (Resource s) = resource =? s propertyToQuery (ClassName s) = className =? s propertyToQuery (Role s) = stringProperty "WM_WINDOW_ROLE" =? s propertyToQuery (Machine s) = stringProperty "WM_CLIENT_MACHINE" =? s propertyToQuery (IsDialog) = propertyToQuery (AtomProperty "_NET_WM_WINDOW_TYPE" "_NET_WM_WINDOW_TYPE_DIALOG") propertyToQuery (AtomProperty k v) = (ask >>= (\w -> liftX $ withDisplay $ \d -> checkAtomProperty d w k v)) =? True propertyToQuery (And p1 p2) = propertyToQuery p1 <&&> propertyToQuery p2 propertyToQuery (Or p1 p2) = propertyToQuery p1 <||> propertyToQuery p2 propertyToQuery (Not p) = not `fmap` propertyToQuery p propertyToQuery (Const b) = return b -- $helpers -- | Get a window property from atom getProp32 :: Atom -> Window -> X (Maybe [CLong]) getProp32 a w = withDisplay $ \dpy -> io $ getWindowProperty32 dpy a w -- | Get a window property from string getProp32s :: String -> Window -> X (Maybe [CLong]) getProp32s str w = do { a <- getAtom str; getProp32 a w } checkAtomProperty d w sKey sValue = do sk <- getAtom sKey sv <- getAtom sValue md <- io $ getWindowProperty32 d sk w case md of Just mm -> if (fromIntegral sv `elem` mm) then return True else return False _ ->return False data SwapWindow = SwapWindow -- ^ Swap window between panes | SwapWindowN Int -- ^ Swap window between panes in the N-th nested ComboP. @SwapWindowN 0@ equals to SwapWindow deriving (Read, Show, Typeable) instance Message SwapWindow data CombineTwoQB l l1 l2 a = C2P [a] [a] [a] l (l1 a) (l2 a) Property deriving (Read, Show) combineTwoQB :: (LayoutClass super(), LayoutClass l1 Window, LayoutClass l2 Window) => super () -> l1 Window -> l2 Window -> Property -> CombineTwoQB (super ()) l1 l2 Window combineTwoQB = C2P [] [] [] instance (LayoutClass l (), LayoutClass l1 Window, LayoutClass l2 Window) => LayoutClass (CombineTwoQB (l ()) l1 l2) Window where doLayout (C2P f w1 w2 super l1 l2 prop) rinput s = let origws = W.integrate s -- passed in windows w1c = origws `intersect` w1 -- current windows in the first pane w2c = origws `intersect` w2 -- current windows in the second pane new = origws \\ (w1c ++ w2c) -- new windows superstack = Just Stack { W.focus=(), up=[], down=[()] } f' = W.focus s:delete (W.focus s) f -- list of focused windows, contains 2 elements at most in do matching <- (hasProperty prop) `filterM` new -- new windows matching predecate let w1' = w1c ++ (new \\ matching) -- updated first pane windows w2' = w2c ++ matching -- updated second pane windows s1 = differentiate f' w1' -- first pane stack s2 = differentiate f' w2' -- second pane stack if not (null w1' || null w2') then do ([((),r1),((),r2)], msuper') <- runLayout (Workspace "" super superstack) rinput (wrs1, ml1') <- runLayout (Workspace "" l1 s1) r1 (wrs2, ml2') <- runLayout (Workspace "" l2 s2) r2 (return (wrs1++wrs2, Just $ C2P f' w1' w2' (maybe super id msuper') (maybe l1 id ml1') (maybe l2 id ml2') prop)) else case (w1' ++ w2') of [] -> do l1' <- maybe l1 id `fmap` handleMessage l1 (SomeMessage ReleaseResources) l2' <- maybe l2 id `fmap` handleMessage l2 (SomeMessage ReleaseResources) super' <- maybe super id `fmap` handleMessage super (SomeMessage ReleaseResources) (return ([], Just $ C2P [] [] [] super' l1' l2' prop)) [w] -> do l1' <- maybe l1 id `fmap` handleMessage l1 (SomeMessage ReleaseResources) l2' <- maybe l2 id `fmap` handleMessage l2 (SomeMessage ReleaseResources) super' <- maybe super id `fmap` handleMessage super (SomeMessage ReleaseResources) (return ([(w,rinput)], Just $ C2P [w] [w] [] super' l1' l2' prop)) ww -> do ([((),r1),((),r2)], msuper') <- runLayout (Workspace "" super superstack) rinput (wrs1, ml1') <- runLayout (Workspace "" l1 s1) rinput (wrs2, ml2') <- runLayout (Workspace "" l2 s2) rinput (return (wrs1++wrs2, Just $ C2P f' w1' w2' (maybe super id msuper') (maybe l1 id ml1') (maybe l2 id ml2') prop)) handleMessage us@(C2P f ws1 ws2 super l1 l2 prop) m | Just SwapWindow <- fromMessage m = swap us | Just (SwapWindowN 0) <- fromMessage m = swap us | Just (SwapWindowN n) <- fromMessage m = forwardToFocused us $ SomeMessage $ SwapWindowN $ n-1 | Just (MoveWindowToWindow w1 w2) <- fromMessage m, w1 `elem` ws1, w2 `elem` ws2 = return $ Just $ C2P f (delete w1 ws1) (w1:ws2) super l1 l2 prop | Just (MoveWindowToWindow w1 w2) <- fromMessage m, w1 `elem` ws2, w2 `elem` ws1 = return $ Just $ C2P f (w1:ws1) (delete w1 ws2) super l1 l2 prop | otherwise = do ml1' <- handleMessage l1 m ml2' <- handleMessage l2 m msuper' <- handleMessage super m if isJust msuper' || isJust ml1' || isJust ml2' then return $ Just $ C2P f ws1 ws2 (maybe super id msuper') (maybe l1 id ml1') (maybe l2 id ml2') prop else return Nothing description (C2P _ _ _ super l1 l2 prop) = "CC0" --"combining " ++ description l1 ++ " and " ++ description l2 ++ " with " ++ description super ++ " using "++ (show prop) -- send focused window to the other pane. Does nothing if we don't -- own the focused window swap :: (LayoutClass s a, LayoutClass l1 Window, LayoutClass l2 Window) => CombineTwoQB (s a) l1 l2 Window -> X (Maybe (CombineTwoQB (s a) l1 l2 Window)) swap (C2P f ws1 ws2 super l1 l2 prop) = do mst <- gets (W.stack . W.workspace . W.current . windowset) let (ws1', ws2') = case mst of Nothing -> (ws1, ws2) Just st -> if foc `elem` ws1 then (foc `delete` ws1, foc:ws2) else if foc `elem` ws2 then (foc:ws1, foc `delete` ws2) else (ws1, ws2) where foc = W.focus st if (ws1,ws2) == (ws1',ws2') then return Nothing else return $ Just $ C2P f ws1' ws2' super l1 l2 prop -- forwards the message to the sublayout which contains the focused window forwardToFocused :: (LayoutClass l1 Window, LayoutClass l2 Window, LayoutClass s a) => CombineTwoQB (s a) l1 l2 Window -> SomeMessage -> X (Maybe (CombineTwoQB (s a) l1 l2 Window)) forwardToFocused (C2P f ws1 ws2 super l1 l2 prop) m = do ml1 <- forwardIfFocused l1 ws1 m ml2 <- forwardIfFocused l2 ws2 m ms <- if isJust ml1 || isJust ml2 then return Nothing else handleMessage super m if isJust ml1 || isJust ml2 || isJust ms then return $ Just $ C2P f ws1 ws2 (maybe super id ms) (maybe l1 id ml1) (maybe l2 id ml2) prop else return Nothing -- forwards message m to layout l if focused window is among w forwardIfFocused :: (LayoutClass l Window) => l Window -> [Window] -> SomeMessage -> X (Maybe (l Window)) forwardIfFocused l w m = do mst <- gets (W.stack . W.workspace . W.current . windowset) maybe (return Nothing) send mst where send st = if (W.focus st) `elem` w then handleMessage l m else return Nothing -- code from CombineTwo -- given two sets of zs and xs takes the first z from zs that also belongs to xs -- and turns xs into a stack with z being current element. Acts as -- StackSet.differentiate if zs and xs don't intersect differentiate :: Eq q => [q] -> [q] -> Maybe (Stack q) differentiate (z:zs) xs | z `elem` xs = Just $ Stack { W.focus=z , up = reverse $ takeWhile (/=z) xs , down = tail $ dropWhile (/=z) xs } | otherwise = differentiate zs xs differentiate [] xs = W.differentiate xs myManageHook0 = composeAll -- help1: run: xprop | grep WM_CLASS -- help2: run: xprop | egrep "CLASS|NAME" [ -- manage hooks appName =? "gimp" --> doFloat , isFullscreen --> doFullFloat -------for flash in ff -------, isDialog --> doCenterFloat ------------, isDialog --> doSink --------------------------------------------------------------- -----, propertyToQuery (IsDialog) --> doSink , propertyToQuery (myDialogs) --> doSink ] --where moveTo = doF . W.shift --where moveTo = doShift where moveTo = doF . liftM2 (.) W.greedyView W.shift --myManageHook = myManageHook0 <+> manageDocks <+> manageHook gnomeConfig myManageHook = myManageHook0 <+> manageDocks <+> manageHook defaultConfig doSink :: ManageHook doSink = ask >>= \w -> liftX (reveal w) >> doF (W.sink w) myTabbed0 = tabbed shrinkText defaultTheme myTabbed = combineTwoQB (Mirror (Tall 1 (3/100) (3/5))) (myTabbed0) (myTabbed0) (myDialogs) myDialogs = (IsDialog) `Or` (ClassName "Dialog") `Or` (ClassName "dialog") `Or` (ClassName "Toplevel") `Or` (ClassName "Chat") `Or` (ClassName "Message") --myTabber is resulted layout. you must not import standard Property -- to use my combineTwoQB -- (i use xmonad 0.9) -- Best regards, Michael

4 12

Issue 436 in xmonad: XMonad.Layout.IM doesn't match UTF8 chars
by codesite-noreply＠google.com 15 Jul '13

15 Jul '13

Status: New Owner: ---- New issue 436 by o.a.stephens: XMonad.Layout.IM doesn't match UTF8 chars http://code.google.com/p/xmonad/issues/detail?id=436 I am encountering the same issue as per http://code.google.com/p/xmonad/issues/detail?id=302 using his same test case. What steps will reproduce the problem? 1. Configure withIM layout to match a window title with UTF8 chars as roster. Ex: withIM (1%7) (Title "foo™") (Tall 1 0.5 0.5) 2. Run a window with the configured name. Ex: xterm -T "foo™" -e read What is the expected output? What do you see instead? The window should be placed as withIM layout roster. In this case, on a separated column to the left. What version of the product are you using? On what operating system? Latest XMonad Darcs on Arch X86_64. Are you using an xmonad.hs? Please attach it and the output of "xmonad --recompile". No output from xmonad --recompile. Please provide any additional information below. Comments from #xmonad having queried my issue: <allbery_b> I'm looking at darcs... WindowProperties uses the ManageHook code (!! --- more evidence that it's mis-typed) and ManageHook.hs in the core uses getStringProperty everywhere <allbery_b> (in particular it's using it for _NET_WM_* which is completely wrong as they are all defined as Unicode stored as 32 bit lists) <allbery_b> suggest you reopen that bug report, or file a new one about _NET_WM_* being misinterpreted I am attempting to match Skype's window title, which also contains the ™ character. Attachments: xmonad.hs 483 bytes

1 3

Issue 432 in xmonad: Module for linking workspaces in a multihead setup
by codesite-noreply＠google.com 14 May '13

14 May '13

Status: New Owner: ---- New issue 432 by que...(a)gmail.com: Module for linking workspaces in a multihead setup http://code.google.com/p/xmonad/issues/detail?id=432 Hey, I just wanted to share some of the functions I have written for linking workspaces. The idea is that the module maintains a list of workspaces that are linked together. Whenever one switches to one of these workspaces, the other monitors are switched to the linked ones. Maybe it's of interest to someone else. It would be nice if it could be added to contrib. Best regards, Jan Attachments: linkWorkspaces.patch 60.6 KB

1 18

Re: Issue 273 in xmonad: Binding multiple keys to the same keysym fails for xmonad hotkeys
by codesite-noreply＠google.com 02 Mar '13

02 Mar '13

Updates: Labels: Type-Enhancement Component-Core Usability Comment #2 on issue 273 by byorgey: Binding multiple keys to the same keysym fails for xmonad hotkeys http://code.google.com/p/xmonad/issues/detail?id=273 (No comment was entered for this change.) -- You received this message because you are listed in the owner or CC fields of this issue, or because you starred this issue. You may adjust your issue notification preferences at: http://code.google.com/hosting/settings

1 5

Re: Issue 158 in xmonad: _NET_WORKAREA support
by codesite-noreply＠google.com 01 Mar '13

01 Mar '13

Updates: Status: Accepted Labels: -Type-Defect Type-Enhancement Comment #6 on issue 158 by byorgey: _NET_WORKAREA support http://code.google.com/p/xmonad/issues/detail?id=158 (No comment was entered for this change.) -- You received this message because you are listed in the owner or CC fields of this issue, or because you starred this issue. You may adjust your issue notification preferences at: http://code.google.com/hosting/settings

1 11

Issue 402 in xmonad: Xmonad becomes unresponsive. No focus changing (using keys or mouse), workspace changing or recompile.
by codesite-noreply＠google.com 01 Mar '13

01 Mar '13

Status: New Owner: ---- New issue 402 by 6181989: Xmonad becomes unresponsive. No focus changing (using keys or mouse), workspace changing or recompile. http://code.google.com/p/xmonad/issues/detail?id=402 What steps will reproduce the problem? 1. No idea. Each time time it's with relatively few windows open (chromium with ~10 tabs and ~4 instances of urxvt). Nothing too heavy. Seems to be random at this point. What is the expected output? What do you see instead? I expect it to...well, no lock up. But it freezes up and none of the keybindings in haskell.hs work (can't even recompile). I can't change workspaces or window focus, but the currently focused window still has its (non-monad related) bindings and functionality work fine (chromium, screen w/ urxvt) and I can still ctrl+alt+F1 to console. Mouse still works, but it doesn't change focus on the windows. What version of the product are you using? On what operating system? Arch x86_64 with kernel 2.6.34-ARCH and xmonad 0.9.1 Are you using an xmonad.hs? Please attach it and the output of "xmonad --recompile". No --recompile output. See attached for xmonad.hs. Please provide any additional information below. It's done it twice in the less than 24 hours I've had it installed. ivanm @ #xmonad has confirmed this problem also. (see logs for 30/07/10 19:31) Attachments: xmonad.hs 4.8 KB

1 17

Issue 326 in xmonad: floating windows can break Actions.UpdatePointer
by codesite-noreply＠google.com 20 Feb '13

20 Feb '13

Status: New Owner: ---- New issue 326 by OrbisVicis: floating windows can break Actions.UpdatePointer http://code.google.com/p/xmonad/issues/detail?id=326 What steps will reproduce the problem? 1. UpdatePointer (TowardsCentre 1 1) 2. spiralWithDir West CW (4/5) 3. scratchpadManageHook (W.RationalRect 0.25 0.3 0.5 0.55) 4. Open two windows in the spiral layout, launch the scratchpad, and start tabbing 5. One of the windows will never receive focus -- You received this message because you are listed in the owner or CC fields of this issue, or because you starred this issue. You may adjust your issue notification preferences at: http://code.google.com/hosting/settings

1 3

Issue 389 in xmonad: Some applications are unresponsive after workspace switch
by codesite-noreply＠google.com 13 Feb '13

13 Feb '13

Status: New Owner: ---- New issue 389 by mr.schyte: Some applications are unresponsive after workspace switch http://code.google.com/p/xmonad/issues/detail?id=389 What steps will reproduce the problem? 1. open an effected application (urxvt, gvim ...) 2. switch to another workspace 3. switch back What is the expected output? What do you see instead? After switching back the selected window doesn't register keyboard input, however after selecting another window (using alt-tab; mouse focus doesn't work) everything works fine until the next workspace switch. What version of the product are you using? On what operating system? xmonad 0.9.1, Linux synapse 2.6.32-ARCH #1 SMP PREEMPT Mon Mar 15 20:44:03 CET 2010 x86_64 Intel(R) Core(TM)2 Duo CPU T8300 @ 2.40GHz GenuineIntel GNU/Linux Are you using an xmonad.hs? Please attach it and the output of "xmonad --recompile". The problem occurs even when using the default configuration. Please provide any additional information below. Some applications work, while others doesn't (xterm works, urxvt doesn't). -- You received this message because you are listed in the owner or CC fields of this issue, or because you starred this issue. You may adjust your issue notification preferences at: http://code.google.com/hosting/settings

1 8