New patches: [Combo: updated to latest runLayout changes Andrea Rossato **20080222175924] { hunk ./XMonad/Layout/Combo.hs 28 -import XMonad.StackSet ( integrate, Stack(..) ) +import XMonad.StackSet ( integrate, Workspace (..), Stack(..) ) hunk ./XMonad/Layout/Combo.hs 103 - (wrs1, ml1') <- runLayout l1 r1 s1 - (wrs2, ml2') <- runLayout l2 r2 s2 + (wrs1, ml1') <- runLayout (Workspace "" l1 s1) r1 + (wrs2, ml2') <- runLayout (Workspace "" l2 s2) r2 } [LayoutModifier: reimplement ModifiedLayout using runLayout and more Andrea Rossato **20080223075610 - change modifyLayout type to get the Workspace - updated ResizeScreen and ManageDocks accordingly. ] { hunk ./XMonad/Hooks/ManageDocks.hs 125 - modifyLayout (AvoidStruts b) l r s = do + modifyLayout (AvoidStruts b) w r = do hunk ./XMonad/Hooks/ManageDocks.hs 127 - doLayout l nr s + runLayout w nr hunk ./XMonad/Layout/LayoutModifier.hs 24 -import XMonad.StackSet ( Stack ) +import XMonad.StackSet ( Stack, Workspace (..) ) hunk ./XMonad/Layout/LayoutModifier.hs 36 - modifyLayout :: (LayoutClass l a) => m a -> l a -> Rectangle - -> Stack a -> X ([(a, Rectangle)], Maybe (l a)) - modifyLayout _ l r s = doLayout l r s + modifyLayout :: (LayoutClass l a) => m a -> Workspace WorkspaceId (l a) a + -> Rectangle -> X ([(a, Rectangle)], Maybe (l a)) + modifyLayout _ w r = runLayout w r hunk ./XMonad/Layout/LayoutModifier.hs 70 - doLayout (ModifiedLayout m l) r s = - do (ws, ml') <- modifyLayout m l r s - (ws', mm') <- redoLayout m r s ws + runLayout (Workspace i (ModifiedLayout m l) ms) r = + do (ws, ml') <- modifyLayout m (Workspace i l ms) r + (ws', mm') <- case ms of + Just s -> redoLayout m r s ws + Nothing -> emptyLayoutMod m r ws hunk ./XMonad/Layout/LayoutModifier.hs 76 - Just m' -> Just $ (ModifiedLayout m') $ maybe l id ml' - Nothing -> ModifiedLayout m `fmap` ml' - return (ws', ml'') - emptyLayout (ModifiedLayout m l) r = - do (ws, ml') <- emptyLayout l r - (ws',mm') <- emptyLayoutMod m r ws - let ml'' = case mm' of - Just m' -> Just $ (ModifiedLayout m') $ maybe l id ml' - Nothing -> ModifiedLayout m `fmap` ml' + Just m' -> Just $ (ModifiedLayout m') $ maybe l id ml' + Nothing -> ModifiedLayout m `fmap` ml' hunk ./XMonad/Layout/LayoutModifier.hs 79 + hunk ./XMonad/Layout/ResizeScreen.hs 66 - modifyLayout m l rect@(Rectangle x y w h) s + modifyLayout m ws rect@(Rectangle x y w h) hunk ./XMonad/Layout/ResizeScreen.hs 73 - where resize nr = doLayout l nr s + where resize nr = runLayout ws nr } [LayoutCombinators: NewSelect reimplemented with runLayout Andrea Rossato **20080223080958] { hunk ./XMonad/Layout/LayoutCombinators.hs 49 +import XMonad.StackSet (Workspace (..)) hunk ./XMonad/Layout/LayoutCombinators.hs 163 - doLayout (NewSelect True l1 l2) r s = do (wrs, ml1') <- doLayout l1 r s - return (wrs, (\l1' -> NewSelect True l1' l2) `fmap` ml1') - doLayout (NewSelect False l1 l2) r s = do (wrs, ml2') <- doLayout l2 r s - return (wrs, (\l2' -> NewSelect False l1 l2') `fmap` ml2') - emptyLayout (NewSelect True l1 l2) r = do (wrs, ml1') <- emptyLayout l1 r - return (wrs, (\l1' -> NewSelect True l1' l2) `fmap` ml1') - emptyLayout (NewSelect False l1 l2) r = do (wrs, ml2') <- emptyLayout l2 r - return (wrs, (\l2' -> NewSelect False l1 l2') `fmap` ml2') + runLayout (Workspace i (NewSelect True l1 l2) ms) r = do (wrs, ml1') <- runLayout (Workspace i l1 ms) r + return (wrs, (\l1' -> NewSelect True l1' l2) `fmap` ml1') + + runLayout (Workspace i (NewSelect False l1 l2) ms) r = do (wrs, ml2') <- runLayout (Workspace i l2 ms) r + return (wrs, (\l2' -> NewSelect False l1 l2') `fmap` ml2') } [ToggleLayouts: reimplemented with runLayout Andrea Rossato **20080223081553] { hunk ./XMonad/Layout/ToggleLayouts.hs 24 +import XMonad.StackSet (Workspace (..)) hunk ./XMonad/Layout/ToggleLayouts.hs 60 - doLayout (ToggleLayouts True lt lf) r s = do (ws,mlt') <- doLayout lt r s - return (ws,fmap (\lt' -> ToggleLayouts True lt' lf) mlt') - doLayout (ToggleLayouts False lt lf) r s = do (ws,mlf') <- doLayout lf r s - return (ws,fmap (\lf' -> ToggleLayouts False lt lf') mlf') - emptyLayout (ToggleLayouts True lt lf) r = do (ws,mlt') <- emptyLayout lt r - return (ws,fmap (\lt' -> ToggleLayouts True lt' lf) mlt') - emptyLayout (ToggleLayouts False lt lf) r = do (ws,mlf') <- emptyLayout lf r - return (ws,fmap (\lf' -> ToggleLayouts False lt lf') mlf') + runLayout (Workspace i (ToggleLayouts True lt lf) ms) r = do (ws,mlt') <- runLayout (Workspace i lt ms) r + return (ws,fmap (\lt' -> ToggleLayouts True lt' lf) mlt') + + runLayout (Workspace i (ToggleLayouts False lt lf) ms) r = do (ws,mlf') <- runLayout (Workspace i lf ms) r + return (ws,fmap (\lf' -> ToggleLayouts False lt lf') mlf') } [PerWorkspace: reimplemented using runLayout Andrea Rossato **20080222175954 This way we have a Xinerama safe PerWorkspace and the emptyLayout method for free. ] { hunk ./XMonad/Layout/PerWorkspace.hs 13 --- Configure layouts on a per-workspace basis. NOTE that this module --- does not (yet) work in conjunction with multiple screens! =( --- --- Note also that when using PerWorkspace, on initial startup workspaces --- may not respond to messages properly until a window has been opened. --- This is due to a limitation inherent in the way PerWorkspace is --- implemented: it cannot decide which layout to use until actually --- required to lay out some windows (which does not happen until a window --- is opened). +-- Configure layouts on a per-workspace basis. hunk ./XMonad/Layout/PerWorkspace.hs 16 -module XMonad.Layout.PerWorkspace ( - -- * Usage - -- $usage - - onWorkspace, onWorkspaces - ) where +module XMonad.Layout.PerWorkspace + ( -- * Usage + -- $usage + onWorkspace, onWorkspaces + ) where hunk ./XMonad/Layout/PerWorkspace.hs 46 --- --- NOTE that this module does not (yet) work in conjunction with --- multiple screens. =( hunk ./XMonad/Layout/PerWorkspace.hs 55 -onWorkspace wsId l1 l2 = PerWorkspace [wsId] Nothing l1 l2 +onWorkspace wsId l1 l2 = PerWorkspace [wsId] True l1 l2 hunk ./XMonad/Layout/PerWorkspace.hs 64 -onWorkspaces wsIds l1 l2 = PerWorkspace wsIds Nothing l1 l2 +onWorkspaces wsIds l1 l2 = PerWorkspace wsIds True l1 l2 hunk ./XMonad/Layout/PerWorkspace.hs 67 --- a layout for all other workspaces. We store the tags of workspaces --- to be matched, and the two layouts. Since layouts are stored\/tracked --- per workspace, once we figure out whether we're on a matched workspace, --- we can cache that information using a (Maybe Bool). This is necessary --- to be able to correctly implement the 'description' method of --- LayoutClass, since a call to description is not able to query the --- WM state to find out which workspace it was called in. +-- a layout for all other workspaces. We store the tags of workspaces +-- to be matched, and the two layouts. We save the layout choice in +-- the Bool, to be used to implement description. hunk ./XMonad/Layout/PerWorkspace.hs 71 - (Maybe Bool) + Bool hunk ./XMonad/Layout/PerWorkspace.hs 76 -instance (LayoutClass l1 a, LayoutClass l2 a) => LayoutClass (PerWorkspace l1 l2) a where - - -- do layout with l1, then return a modified PerWorkspace caching - -- the fact that we're in the matched workspace. - doLayout p@(PerWorkspace _ (Just True) lt _) r s = do - (wrs, mlt') <- doLayout lt r s - return (wrs, Just $ mkNewPerWorkspaceT p mlt') - - -- do layout with l1, then return a modified PerWorkspace caching - -- the fact that we're not in the matched workspace. - doLayout p@(PerWorkspace _ (Just False) _ lf) r s = do - (wrs, mlf') <- doLayout lf r s - return (wrs, Just $ mkNewPerWorkspaceF p mlf') +instance (LayoutClass l1 a, LayoutClass l2 a, Show a) => LayoutClass (PerWorkspace l1 l2) a where + runLayout (W.Workspace i p@(PerWorkspace wsIds _ lt lf) ms) r + | i `elem` wsIds = do (wrs, mlt') <- runLayout (W.Workspace i lt ms) r + return (wrs, Just $ mkNewPerWorkspaceT p mlt') + | otherwise = do (wrs, mlt') <- runLayout (W.Workspace i lf ms) r + return (wrs, Just $ mkNewPerWorkspaceF p mlt') hunk ./XMonad/Layout/PerWorkspace.hs 83 - -- figure out which layout to use based on the current workspace. - doLayout (PerWorkspace wsIds Nothing l1 l2) r s = do - t <- getCurrentTag - doLayout (PerWorkspace wsIds (Just $ t `elem` wsIds) l1 l2) r s + handleMessage (PerWorkspace wsIds bool lt lf) m + | bool = handleMessage lt m >>= maybe (return Nothing) (\nt -> return . Just $ PerWorkspace wsIds bool nt lf) + | otherwise = handleMessage lf m >>= maybe (return Nothing) (\nf -> return . Just $ PerWorkspace wsIds bool lt nf) hunk ./XMonad/Layout/PerWorkspace.hs 87 - -- handle messages; same drill as doLayout. - handleMessage p@(PerWorkspace _ (Just True) lt _) m = do - mlt' <- handleMessage lt m - return . Just $ mkNewPerWorkspaceT p mlt' - - handleMessage p@(PerWorkspace _ (Just False) _ lf) m = do - mlf' <- handleMessage lf m - return . Just $ mkNewPerWorkspaceF p mlf' - - handleMessage (PerWorkspace _ Nothing _ _) _ = return Nothing - - description (PerWorkspace _ (Just True ) l1 _) = description l1 - description (PerWorkspace _ (Just False) _ l2) = description l2 - - -- description's result is not in the X monad, so we have to wait - -- until a doLayout for the information about which workspace - -- we're in to get cached. - description _ = "PerWorkspace" + description (PerWorkspace _ True l1 _) = description l1 + description (PerWorkspace _ _ _ l2) = description l2 hunk ./XMonad/Layout/PerWorkspace.hs 93 -mkNewPerWorkspaceT (PerWorkspace wsIds b lt lf) mlt' = - (\lt' -> PerWorkspace wsIds b lt' lf) $ fromMaybe lt mlt' +mkNewPerWorkspaceT (PerWorkspace wsIds _ lt lf) mlt' = + (\lt' -> PerWorkspace wsIds True lt' lf) $ fromMaybe lt mlt' hunk ./XMonad/Layout/PerWorkspace.hs 98 -mkNewPerWorkspaceF (PerWorkspace wsIds b lt lf) mlf' = - (\lf' -> PerWorkspace wsIds b lt lf') $ fromMaybe lf mlf' - --- | Get the tag of the currently active workspace. Note that this --- is only guaranteed to be the same workspace for which doLayout --- was called if there is only one screen. -getCurrentTag :: X WorkspaceId -getCurrentTag = gets windowset >>= return . W.tag . W.workspace . W.current +mkNewPerWorkspaceF (PerWorkspace wsIds _ lt lf) mlf' = + (\lf' -> PerWorkspace wsIds False lt lf') $ fromMaybe lf mlf' } [PerWorksapce: use a safer False as default Andrea Rossato **20080223075531] { hunk ./XMonad/Layout/PerWorkspace.hs 55 -onWorkspace wsId l1 l2 = PerWorkspace [wsId] True l1 l2 +onWorkspace wsId l1 l2 = PerWorkspace [wsId] False l1 l2 hunk ./XMonad/Layout/PerWorkspace.hs 64 -onWorkspaces wsIds l1 l2 = PerWorkspace wsIds True l1 l2 +onWorkspaces wsIds l1 l2 = PerWorkspace wsIds False l1 l2 } [MultiToggle: fix to work with runLayout changes to core Brent Yorgey **20080311172046] { hunk ./XMonad/Layout/MultiToggle.hs 32 +import XMonad.StackSet (Workspace(..)) + hunk ./XMonad/Layout/MultiToggle.hs 201 - pureLayout mt r s = currLayout mt `unEL` \l -> pureLayout l r s - - doLayout mt r s = currLayout mt `unEL` \l -> acceptChange mt (fmap . fmap) (doLayout l r s) - - emptyLayout mt r = currLayout mt `unEL` \l -> acceptChange mt (fmap . fmap) (emptyLayout l r) + runLayout (Workspace i mt s) r = currLayout mt `unEL` \l -> acceptChange mt (fmap . fmap) (runLayout (Workspace i l s) r) } [Combo: update to work with runLayout changes Brent Yorgey **20080311181400] { hunk ./XMonad/Layout/Combo.hs 9 --- +-- hunk ./XMonad/Layout/Combo.hs 20 - -- $usage + -- $usage hunk ./XMonad/Layout/Combo.hs 34 --- --- > import XMonad.Layout.Combo --- +-- +-- > import XMonad.Layout.Combo +-- hunk ./XMonad/Layout/Combo.hs 38 --- +-- hunk ./XMonad/Layout/Combo.hs 102 - ([((),r1),((),r2)], msuper') <- doLayout super rinput superstack + ([((),r1),((),r2)], msuper') <- runLayout (Workspace "" super (Just superstack)) rinput } [LayoutScreens: update to work with runLayout changes Brent Yorgey **20080311181537] { hunk ./XMonad/Layout/LayoutScreens.hs 61 - (wss, _) <- doLayout l rtrect W.Stack { W.focus=1, W.up=[],W.down=[1..nscr-1] } + (wss, _) <- runLayout (W.Workspace "" l (Just $ W.Stack { W.focus=1, W.up=[],W.down=[1..nscr-1] })) rtrect } [MagicFocus: update to work with runLayout changes Brent Yorgey **20080311181625] { hunk ./XMonad/Layout/MagicFocus.hs 16 -module XMonad.Layout.MagicFocus +module XMonad.Layout.MagicFocus hunk ./XMonad/Layout/MagicFocus.hs 47 -magicFocus (MagicFocus l) r s = +magicFocus (MagicFocus l) r s = hunk ./XMonad/Layout/MagicFocus.hs 49 - (ws,nl) <- doLayout l r (swap s $ peek wset) + (ws,nl) <- runLayout (Workspace "" l (Just . swap s $ peek wset)) r } [Scratchpad: update to work with runLayout changes Brent Yorgey **20080311181715] { hunk ./XMonad/Util/Scratchpad.hs 17 --- The default ManageHook uses a centered, half-screen-wide, +-- The default ManageHook uses a centered, half-screen-wide, hunk ./XMonad/Util/Scratchpad.hs 23 --- Most others are likely to follow the lead set by xterm. --- +-- Most others are likely to follow the lead set by xterm. +-- hunk ./XMonad/Util/Scratchpad.hs 32 --- +-- hunk ./XMonad/Util/Scratchpad.hs 36 --- +-- } [ScratchWorkspace: update to work with runLayout changes Brent Yorgey **20080311212908] { hunk ./XMonad/Layout/ScratchWorkspace.hs 59 - (rs,_) <- doLayout l r (W.Stack 0 [1] []) + (rs,_) <- runLayout (W.Workspace "" l (Just $ W.Stack 0 [1] [])) r } Context: [rewrite ScratchWorkspace to make scratch always visible, but not always on screen. David Roundy **20080308223830] [Fix to work with "floats always use current screen" patch robreim@bobturf.org**20080308024928] [make smartBorders ignore screens with no dimensions. David Roundy **20080308224244] [add HiddenNonEmptyWS to CycleWS to avoid workspaces already visible. David Roundy **20080308223717] [Fix ThreeColumns doc. Roman Cheplyaka **20080307203022] [EZConfig: add documentation and a warning, so no one repeats my silly hard-to-track-down mistake. Brent Yorgey **20080311172610] [Fix xmonadPromptC and use it. nicolas.pouillard@gmail.com**20080306163928] [Documentation typo about UpdatePointer. nicolas.pouillard@gmail.com**20080306163516] [Fix ToggleOff: It was adding 0.1 to the magnification. Braden Shepherdson **20080305222302] [Removed WmiiActions module. Juraj Hercek **20080305082336] [Adjusted signature of DirExec module functions. Juraj Hercek **20080301171905 - added parameter for function which executes the selected program - renamed dirExecPromptWithName to dirExecPromptNamed ] [Import of new DirExec module. Juraj Hercek **20080229212257 - allows execution of executable files from specific directory ] [Shell: add support for UTF-8 locales Andrea Rossato **20080302095924] [Font and XUtils: add UTF-8 support and various fixes related to XFT Andrea Rossato **20080302095712 - printStringXMF: use the background color for XFT fonts too - textWidthXMF now returns the text width even with xft fonts - textExtentsXMF will now return only the ascend and the descent of a string. - stringPosition now takes the display too - add support for UTF-8 locales: if the contrib library is compiled with the 'with_xft' or the 'with_utf8' option the prompt and the decoration system will support UTF-8 locales - this requires utf8-strings. ] [Ssh: coding style Andrea Rossato **20080229100346] [Ssh: complete known hosts with non standard ports too Andrea Rossato **20080229095014] [Hooks.DynamicLog: export xmobarPP Dmitry Kurochkin **20080303215637] [Changed semantics of UpdatePointer to move to nearest point robreim@bobturf.org**20080301143126] [UpdatePointer XMonadContrib module robreim@bobturf.org**20080301134401] [Util.Run: minor clarification in comment gwern0@gmail.com**20080303051513] [Magnifier: fix behavior for windows on the bottom + right of the screen. Now all magnified windows will be the same size, possibly shifted in order to fit completely on the screen. Brent Yorgey **20080303204619] [Add XMonad.Actions.PerWorkspaceKeys Roman Cheplyaka **20080302202346] [Haddock fix: Changed URL-Markup Dominik Bruhn **20080302185435] [switch Droundy to smartBorders (which works better with ScratchWorkspace). David Roundy **20080301191103] [XMonad.Layout.Simplest: add FlexibleInstances pragma Lukas Mai **20080301061714] [XMonad.Layout.ScratchWorkspace: avoid warnings, make tests compile again Lukas Mai **20080301061625] [implement ScratchWorkspace. David Roundy **20080229224316] [in Prompt.Workspace sort by official workspace order. David Roundy **20080229223047] [simplify Simplest--allow it to apply to non-Windows. David Roundy **20080229221326] [XMonad.Actions.MouseGestures.mkCollect: generalize type Lukas Mai **20080229211732] [Add bottom-tabbed layout. Roman Cheplyaka **20080229155120] [XMonad.Actions.MouseGestures: refactoring, code simplification Lukas Mai **20080229002136 It is now possible to get "live" status updates while the gesture handler is running. I use this in my xmonad.hs to print the current gesture to my status bar. Because collecting movements is now the callback's job, the implementation of mouseGestureH got quite a bit simpler. The interface is incompatible with the previous mouseGestureH but the old mouseGesture function works as before. ] [EZConfig: additional documentation Brent Yorgey **20080227164602] [XMonad.Util.Scratchpad: change 'XConfig Layout' to 'XConfig l', to avoid type mismatches; the exact layout type doesn't actually matter Brent Yorgey **20080227014201] [EZConfig: add an emacs-style keybinding parser! Brent Yorgey **20080226222723 Now, instead of writing out incredibly dull things like ((modMask conf .|. controlMask .|. shiftMask, xK_F2), ...) you can just write ("M-C-S-", ...) Hooray! ] [Xmonad.Actions.MouseGestures: generalize interface, allow hooks Lukas Mai **20080226202639] [update inactive debugging code in MouseGestures; no visible changes Lukas Mai **20071109020755] [Scratchpad terminal Braden Shepherdson **20080225183633 Key binding and ManageHook to pop up a small, floating terminal window for a few quick commands. Combined with a utility like detach[1], makes a great X application launcher. Requires my two new ManageHooks (doRectFloat, specifically). [1] http://detach.sourceforge.net ] [Two new floating window ManageHooks. Braden Shepherdson **20080225183337 Adds doRectFloat, which floats the new window in the given rectangle; and doCenterFloat, which floats the new window with its original size, but centered. ] [Fix usage doc. Roman Cheplyaka **20080225062330] [Fix haddock hyperlink. Roman Cheplyaka **20080224205416] [Add XMonad.Layout.IM Roman Cheplyaka **20080221085752] [Export XMonad.Layout.Grid.arrange (for use in XMonad.Layout.IM) Roman Cheplyaka **20080221062204] [Decoration: some haddock updates Andrea Rossato **20080220214934] [Small refactoring. Nils Anders Danielsson **20080210224756] [Fixed off-by-one error which broke strut handling for some panels. Nils Anders Danielsson **20080210222600] [Decoration: fix an issue with decoration window creation and more Andrea Rossato **20080220204355 - fix a bug reported by Roman Cheplyaka: when decorate returned Nothing the window was never going to be created, even if decorate was reporting a Just Rectangle in the next run. Quite a deep issue, still visible only with TabbedDecoration at the present time. - remove decorateFirst (decorate has enough information to decide whether a window is the first one or not, am I right, David?) - some point free. ] [DynamicLog.hs: haddock fix Andrea Rossato **20080220204033 Someone forgot to check if her patch was going to break haddock docs generation or not. So, while I was recording a patch with quite a long description I had to manually write - sound strange? -, I found out that my patch did not pass the tests, because of this haddock problem left behind. And so I fixed it, recorded this patch, with the hope the my next description of the next patch I'm going to record will survive the test suite we created to avoid this kind of problems for. ] [improvements to XMonad.Hooks.DynamicLog, and new contrib module XMonad.Util.Loggers Brent Yorgey **20080219210128 Improvements to DynamicLog include: * Greatly expanded and improved documentation and examples * remove seemingly useless makeSimpleDzenConfig function * factor out xmobarPP * add new ppExtras field to PP record, for specifying 'extra' loggers which can supply information other than window title, layout, and workspace status to a status bar (for example, time and date, battery status, mail status, etc.) The new XMonad.Util.Loggers module provides some example loggers that can be used in the new ppExtras field of the PP record. Create your own, add them to this module, go crazy! =) ] [LayoutHints: fix a wrong fix Andrea Rossato **20080219165127 The case analisys of my fix should be the other way around... this is the real fix. ] [Arossato: updated to latest changes Andrea Rossato **20080219163058] [Decoration: comment only Andrea Rossato **20080219161339 This is a detailed commentary of all the code. ] [Decoratione: generate rectangles first, and create windows accordingly Andrea Rossato **20080219122115 With this patch Decoration will first generate a rectangle and only if there is a rectangle available a window will be created. This makes the Decoration state a bit more difficult to process, but should reduce resource consumption. ] [Fix doc for Tabbed Roman Cheplyaka **20080219055650] [Tabbed and TabBarDecoration: no need to implement decorateFirst (the default is used) Andrea Rossato **20080218184950] [TabBarDecoration: simpleTabBar automatically applies resizeVertical Andrea Rossato **20080218180922 Added some comments too. ] [DwmStyle: comment fix only Andrea Rossato **20080218180727] [ResizeScreen: add resizeHorizontalRight and resizeVerticalBottom Andrea Rossato **20080218180504] [Add TabBarDecoration, a layout modifier to add a bar of tabs to any layout Andrea Rossato **20080218161121 ... and port DecorationMadness to the new system. ] [add Eq superclass to DecorationStyle and change styles in order not to decorate non managed windows Andrea Rossato **20080218131320] [Refactor MouseResize, remove isDecoration and introduce isInStack, isVisible, isInvisible Andrea Rossato **20080218105726 This patch includes several changes, which are strictly related and cannot be recorded separately: - remove Decoraion.isDecoartion and introduce Decoration.isInStack (with the related change to LayoutHints) - in Decoration introduce useful utilities: isVisible, isInvisible, isWithin and lookFor' - MouseResize: - invisible inputOnly windows will not be created; - fix a bug in the read instance which caused a failure in the state deserialization. ] [Prompt: regenerate completion list if there's just one completion Andrea Rossato **20080217132734] [Prompt.Theme: use mkComplFunFromList' to generate completions Andrea Rossato **20080217124453] [some code formatting Andrea Rossato **20080217124434] [Prompt: comment only (clafiry completionToCommand uses) Andrea Rossato **20080216181620] [Prompt: comment only (remove confusing remarks about commandToComplete) Andrea Rossato **20080216180412] [Prompt: haddock fixes only Andrea Rossato **20080216172331] [Prompt.XMonad: use mkComplFunFromList' to get all the completions with an empty command line Andrea Rossato **20080216133949] [Prompt.Window: remove unneeded and ugly escaping/unescaping Andrea Rossato **20080216133842] [Theme: move theme's nextCompletion implementation to Prompt.getNextCompletion Andrea Rossato **20080216133738] [Shell: escape the string in the command line only Andrea Rossato **20080216133651] [Prompt: add some methods to make completions more flexible Andrea Rossato **20080216133454 - now it is possible to decide if the prompt will complete the last word of the command line or the whole line (default is the last word); - completing the last word can be fine tuned by implementing 'commandToComplete' and 'completionToCommand': see comments for details; - move mkComplFunFromList' from TagWindows to Prompt. ] [Prompt.Theme: display all theme information and handle completion accordingly Andrea Rossato **20080216114159] [Prompt.Shell: if there's just one completion and it is a directory add a trailing slash Andrea Rossato **20080216114005] [Prompt: added nextCompletion and commandToComplete methods to fine tune prompts' completion functions Andrea Rossato **20080216113723] [Util.Themes: add ppThemeInfor to render the theme info Andrea Rossato **20080216113635] [DecorationMadness: resizable layouts now use MouseResize too Andrea Rossato **20080212173645] [SimpleFloat now uses MouseResize Andrea Rossato **20080212173615] [Add Actions.MouseResize: a layout modifier to resize windows with the mouse Andrea Rossato **20080212173455] [Decoration: remove mouse resize and more Andrea Rossato **20080212165306 - since mouse resize is not related to decoration, I removed the code from here. Mouse resize will be handled by a separated layout modifier (in a separated module) - now also stacked decoration will be removed (I separated insert_dwr from remove_stacked) ] [Decoration.hs: variable names consistency only Andrea Rossato **20080211123056] [Tabbed and SimpleTabbed (in DecorationMadness) define their own decorationMouseDragHook method Andrea Rossato **20080211114043 ... to disable mouse drag in tabbed layouts ] [Decoration: DecorationStyle class cleanup and focus/drag unification Andrea Rossato **20080211113650 - moved decoEventHook to decorationEventHook - added decorationMouseFocusHook, decorationMouseDragHook, decorationMouseResizeHook methods - added a handleMouseFocusDrag to focus and drag a window (which makes it possible to focus *and* drag unfocused windows too ] [Refactor XMonad.Hooks.DynamicLog Roman Cheplyaka **20080210222406 This allows using DynamicLog not only for statusbar. ] [DecorationMadness: comment only Andrea Rossato **20080210131427] [DecorationMadness: added a few floating layouts Andrea Rossato **20080210122523] [SimpleFloat: export SimpleFloat and add documentation Andrea Rossato **20080210113159] [Move DefaultDecoration from DecorationMadness to Decoration Andrea Rossato **20080210104304] [Themes: added robertTheme and donaldTheme Andrea Rossato **20080210083016] [DecorationMadness: make tunable tabbed layouts respect the Theme decoHeight field Andrea Rossato **20080210075322] [ScreenResize: vertical and horizontal now respond to SetTheme Andrea Rossato **20080210074544 And so they will change the screen dimension accordingly. ] [WindowGo.hs: fix syntax in example Brent Yorgey **20080209225135] [+doc for WindowGo.hs: I've discovered a common usecase for me for raiseMaybe gwern0@gmail.com**20080205032155] [Run.hs: add an option to runinterms gwern0@gmail.com**20080205031824 It turns out that for urxvt, and most terminal, apparently, once you give a '-e' option, that's it. They will not interpret anything after that as anything but input for /bin/sh, so if you wanted to go 'runInTerm "'screen -r session' -title IRC"', you were SOL - the -title would not be seen by urxvt. This, needless to say, is bad, since then you can't do stuff like set the title which means various hooks and extensions are helpless. This patch adds an extra options argument which is inserted *before* the -e. If you want the old behaivour, you can just go 'runInTerm "" "executable"', but now if you need to do something extra, 'runInTerm "-title mutt" "mutt"' works fine. This patch also updates callers. ] [Add DecorationMadness: a repository of weirdnesses Andrea Rossato **20080209182515] [Decoration: change mouseEventHook to decoEventHook and more Andrea Rossato **20080209165101 Fix also the problem with window's movement when the grabbing starts ] [Tabbed: add simpleTabbed and fx documentation Andrea Rossato **20080209163917 simpleTabbed is just a version of tabbed with default theme and default srhinker. ] [Arossato: update to latest changes Andrea Rossato **20080208140604] [Decoration: enable mouse dragging of windows Andrea Rossato **20080208083602] [WindowArranger: add a SetGeometry message - needed to enable mouseDrag Andrea Rossato **20080208083413] [Decoration: add a mouseEventHook methohd and move mouse button event there Andrea Rossato **20080208073514] [Util.Thems: some more typos in comments Andrea Rossato **20080207233341] [Util.Themes: documentation and export list (added themes that have been left out) Andrea Rossato **20080207232251] [Prompt.Theme: comments and some point-free Andrea Rossato **20080207232155] [oxymor00nTheme **20080207213100] [add swapScreen to CycleWS **20080206191032 * add support for swapping the workspaces on screens to CycleWS ] [Decoration: consistency of variable names Andrea Rossato **20080207191442 Since the configuration is now called Theme, the variable 'c' is now a 't' ] [Add Prompt.Theme: a prompt for dynamically applying a theme to the current workspace Andrea Rossato **20080207184321] [Decoration: add a SetTheme message and releaseResources Andrea Rossato **20080207184048 ...which should make it harder to forget to release the font structure. ] [cabal file: respect alphabetic order for modules Andrea Rossato **20080207183153] [Add Util.Themes to collect user contributed themes Andrea Rossato **20080207182843] [SimpleFloat: comment only Andrea Rossato **20080207182438] [Update to safer initColor api Don Stewart **20080206192232] [use Util.WorkspaceCompare in Prompt.Workspace. David Roundy **20080206004057] [roll back to previous version of Droundy.hs. David Roundy **20080205204043 A cleaner WindowNavigation fix made the separation of tabbed and addTabs not strictly necessary (but still a desireable possibility in my opinion, as it allows pretty decoration of non-composite layouts that might want to have some of their windows tabbed. ] [make WindowNavigation ignore decorations. David Roundy **20080205203556] [make tabbed work nicely with LayoutCombinators and WindowNavigation. David Roundy **20080205202343 The problem is that WindowNavigation assumes all windows are navigable, and it was getting confused by decorations. With a bit of work, we can decorate windows *after* combining layouts just fine. ] [make WindowNavigation work when windows are stacked. David Roundy **20080205202027] [ XMonad.Actions.WindowGo: add a runOrRaise module for Joseph Garvin with the help of Spencer Janssen gwern0@gmail.com**20080204173402] [enable proper handling of panels in droundy config. David Roundy **20080204030843] [enable button click for focus in tabbed. David Roundy **20080204010536 Note that this patch doesn't work with Thu Dec 27 03:03:56 EST 2007 Spencer Janssen * Broadcast button events to all layouts, fix for issue #111 but this isn't a regression, since button events have never worked with tabbed and this change. ] [in Decoration, remove windows that are precisely hidden underneath other windows. David Roundy **20080204005413 This is needed for WindowNavigation to work properly with the new Decorations framework. ] [switch tabbed back to using Simplest (so tabs will be shown). David Roundy **20080204005350] [CycleWS: change example binding for toggleWS from mod-t to mod-z. example bindings shouldn't conflict with default key bindings. Brent Yorgey **20080201202126] [REMOVE RotView: use CycleWS instead. Brent Yorgey **20080201180618 See CycleWS docs for info on switching, or just look at the changes to XMonad.Config.Droundy. ] [CycleWS: add more general functionality that now subsumes the functionality of RotView. Now with parameterized workspace sorting and predicates! Brent Yorgey **20080201121524] [WorkspaceCompare: some refactoring. Brent Yorgey **20080201120430 * Export WorkspaceCompare and WorkspaceSort types. * Extract commonality in sort methods into mkWsSort, which creates a workspace sort from a workspace comparison function. * Rename getSortByTag to getSortByIndex, since it did not actually sort by tag at all; it sorts by index of workspace tags in the user's config. * Create a new getSortByTag function which actually does sort lexicographically by tag. * Enhance documentation. ] [Search.hs: haddock cleanup Brent Yorgey **20080131161948] [Added a handy tip to the documentation of XMonad.Actions.Search v.dijk.bas@gmail.com**20080131122620 The tip explains how to use the submap action to create a handy submap of keybindings for searching. ] [Make LayoutHints a decoration aware layout modifier Andrea Rossato **20080131082314] [Remove LayoutCombinator class and revert PerWorkspace to its Maybe Bool state Andrea Rossato **20080131063929 As I said in order to have a CombinedLayout type instace of LayoutClass and a class for easily writing pure and impure combinators to be feeded to the CombinedLayout together with the layouts to be conbined, there's seems to be the need to change the type of the LayoutClass.description method from l a -> String to l a -> X String. Without that "ugly" change - loosing the purity of the description (please note the *every* methods of that class unless description operates in the X monad) - I'm plainly unable to write something really useful and maintainable. If someone can point me in the right direction I would really really appreciate. Since, in the meantime, PerWorkspace, which has its users, is broken and I broke it, I'm reverting it to it supposedly more beautiful PerWorkspac [WorkspaceId] (Maybe Bool) (l1 a) (l2 a) type. ] [LayoutCombinator class: code clean up Andrea Rossato **20080129224952 - ComboType becomes CombboChooser - removed the stupid doFirst - better comboDescription default implemenation ] [Add a LayoutCombinator class and a CombinedLayout and port PerWorkspace to the new system Andrea Rossato **20080129192903] [Extending.hs: documentation update Brent Yorgey **20080131012728] [SimpleDecoration: export defaultTheme Andrea Rossato **20080130124609] [DynamicLog: lots of additional documentation; add byorgeyPP as an example dzen config Brent Yorgey **20080130205219] [Extended PP with sorting algorithm specification and added xinerama sorting Juraj Hercek **20080109154923 algorithm - idea is to specify sorting algorithm from user's xmonad.hs - xinerama sorting algorithm produces same ordering as pprWindowSetXinerama - default ppSort is set to getSortByTag, so the default functionality is the same as it was before ] [Various decorations related updates Spencer Janssen **20080130064624 * remove deprecated TConf stuff * Remove 'style' from DeConf * Change DeConf to Theme * share defaultTheme across all decorations ] [TwoPane: add description string Joachim Fasting **20080126141332] [Search.hs: add documentation and two more search engines (MathWorld and Google Scholar) Brent Yorgey **20080128190443] [xmonad-contrib.cabal: add build-type field to get rid of Cabal warning Brent Yorgey **20080128190137] [add XMonad.Actions.CycleSelectedLayouts Roman Cheplyaka **20080116205020] [Named: reimplemented as a LayoutModifier and updated Config.Droundy accordingly Andrea Rossato **20080128161343] [LayoutModifier: add modifyDescription for completely override the modified layout description Andrea Rossato **20080128160614] [Make ToggleLayouts and Named implement emptyLayout Andrea Rossato **20080128151535] [Decoration: the fontset must be released even when we don't decorate the first window Andrea Rossato **20080128004411 This is quite an old bug! It affected Tabbed since the very beginning..;) ] [Decoration: I forgot we need to release the fontset too! Andrea Rossato **20080127233521] [Decoration: after deleting the windows we must update the layout modifier Andrea Rossato **20080127231815 Thanks to Feuerbach for reporting this. ] [Reflect: reimplemented as a layout modifier (which makes it compatible with windowArranger and decoration) Andrea Rossato **20080127165854] [SimpleFLoat: change the description to Float (Simple is the decoration description) Andrea Rossato **20080127144556] [ManageDocks: implement AvoidStruts as a layout modifier Andrea Rossato **20080127144301] [ResizeScreen has been rewritten as a layout modifier Andrea Rossato **20080127140837] [LayoutModifier add a modifyLayout Andrea Rossato **20080127140219 Many layouts are written as layout modifiers because they need to change the stack of the rectangle before executing doLayout. This is a major source of bugs. all layout modifiers should be using the LayoutModifier class. This method (modifyLayout) can be used to manipulate the rectangle and the stack before running doLayout by the layout modifier. ] [Make LayoutCombinators deal with emptyLayout Andrea Rossato **20080127092415] [Add ResizeScreen, a layout modifier for modifing the screen geometry Andrea Rossato **20080127010755] [WindowArranger can now arrange all windows Andrea Rossato **20080126233053 This is useful for SimpleFloat, whose state can now persists across layout switches. ] [Arossato: updated my config to recent changes Andrea Rossato **20080126205638] [Add SimpleFloat a very basic floating layout that will place windows according to their size hints Andrea Rossato **20080126205410] [WindoWrranger: export the WindowArranger type (see the upcoming SimpleFloat) Andrea Rossato **20080126204605] [ShowWName: show the name of empty layouts too Andrea Rossato **20080126190214] [ManageDocks: add emptyLayout definition for supporting the new decoration framework Andrea Rossato **20080126185936] [Decoration: code formatting only Andrea Rossato **20080126101354] [export DeConfig to avoid importing Decoration Andrea Rossato **20080126101049] [Prompt: code formatting only Andrea Rossato **20080126093234] [Don't export TConf anymore and export DeConfig instead Andrea Rossato **20080126092141 WARNING: this patch may be breaking your configuration. While it is still possible to use: tabbed shrinkText defaultTConf updating the fields of the defaultTConf record is not possible anymore, since the type TConf is now hidden. WARNING: "tabSize" has been substituted by "decoHeight" You can change your configuration this way: myTConf :: TConf myTConf = defaultTConf { tabSize = 15 , etc.... becomes: myTConf :: DeConfig TabbedDecoration Window myTConf = defaultTabbedConfig { decoHeight = 15 , etc.... and tabbed shrinkText myTConf becomes: tabDeco shrinkText myTConf ] [Tabbed now uses Decoration Andrea Rossato **20080125152311] [Add DwmStyle, a layout modifier to add dwm-style decorations to windows in any layout Andrea Rossato **20080125152152] [Adde SimpleDecoration, a layout modifier to add simple decorations to windows in any layout Andrea Rossato **20080125152106] [Add Layout.Simplest, the simplest layout Andrea Rossato **20080125152015] [Add Decoration, a layout modifier and a class for easily writing decorated layouts Andrea Rossato **20080125151726] [Add WindowArranger, a layout modifier to move and resize windows with the keyboard Andrea Rossato **20080125151633] [ShowWName: moved fi to XUtils Andrea Rossato **20080124134725] [XUtils: add functions for operating on lists of windows and export fi Andrea Rossato **20080124134638] [LayoutModifier: add emptyLayoutMod for dealing with empty workspaces Andrea Rossato **20080124015605] [LayoutModifier: add pureMess and pureModifier to the LayoutModifier class Andrea Rossato **20080122111319] [Layout.ShowWName: generalize the instance Andrea Rossato **20080115045139] [add emptyLayout to MultiToggle Lukas Mai **20080128175313] [grammar fix Lukas Mai **20080128175059] [TAG 0.6 Spencer Janssen **20080127222114] Patch bundle hash: 8f154261facef31b582990fc98962e79cca395b4