I have subscribed to xmonad maillist but i never received any email !
Deniz Dogan-3 wrote: > > 2009/11/16 zaxis <[email protected]>: >> >> %uname -a >> Linux myarch 2.6.31-ARCH #1 SMP PREEMPT Tue Nov 10 19:48:17 CET 2009 i686 >> AMD Athlon(tm) 64 X2 Dual Core Processor 3600+ AuthenticAMD GNU/Linux >> >> %xmonad --version >> xmonad 0.9 >> >> In firefox, the `save as` dialog doesnot appear when i want to choose >> picture to save by right clicking the mouse. >> >> %cat ~/.xmonad/xmonad.hs >> import XMonad >> >> import XMonad.Hooks.ManageDocks >> import XMonad.Hooks.EwmhDesktops >> import XMonad.Hooks.DynamicLog >> import XMonad.Hooks.ManageHelpers >> >> import XMonad.Util.Run(spawnPipe) >> >> import XMonad.Layout.TwoPane >> import XMonad.Layout.WindowNavigation >> >> import qualified XMonad.StackSet as W >> import qualified Data.Map as M >> >> main = do >> xmonad $ defaultConfig >> { borderWidth = 1 >> , focusedBorderColor = "#ff6666" >> , normalBorderColor = "#2222aa" >> , manageHook = manageHook defaultConfig <+> myManageHook >> , workspaces = map show [1 .. 10 :: Int] >> , terminal = "roxterm" >> , modMask = mod4Mask >> , focusFollowsMouse = True >> , startupHook = myStartupHook >> , logHook = myLogHook >> , layoutHook = windowNavigation $ avoidStruts $ (Mirror >> tall ||| tall ||| Full) >> --, layoutHook = ewmhDesktopsLayout $ windowNavigation $ >> avoidStruts $ (Mirror tall ||| tall ||| Full) >> , keys = \c -> myKeys c `M.union` keys >> defaultConfig >> c >> --, mouseBindings = \c -> myMouse c `M.union` mouseBindings >> defaultConfig c >> } >> where >> tall = Tall 1 (3/100) (1/2) >> >> myStartupHook :: X () >> myStartupHook = do { >> spawn "fcitx"; >> spawn "roxterm"; >> spawn "lxpanel"; >> spawn "/home/sw2wolf/bin/kvm.sh"; >> } >> myLogHook :: X () >> myLogHook = ewmhDesktopsLogHook >> >> myManageHook :: ManageHook >> myManageHook = composeAll . concat $ >> [ [ className =? c --> doFloat | c <- myCFloats] >> ,[ resource =? r --> doFloat | r <- myRFloats] >> ,[ title =? t --> doFloat | t <- myTFloats] >> ,[ className =? c --> doIgnore | c <- ignores] >> ,[ className =? "Audacious" --> doShift "3" ] >> ,[ className =? "Firefox" --> doF W.swapDown] >> ,[(role =? "gimp-toolbox" <||> role =? >> "gimp-image-window") --> (ask >>= doF . W.sink)]] >> where myCFloats = ["Thunderbird-bin", "GQview", >> "MPlayer", "Gimp","Vncviewer","Xmessage"] >> myRFloats = ["Dialog", "Download", "Places"] >> myTFloats = ["Firefox Preferences", "Element >> Properties"] >> ignores = ["trayer"] >> role = stringProperty "WM_WINDOW_ROLE" >> >> myKeys (XConfig {modMask = modm}) = M.fromList $ >> -- Apps and tools >> [ ((modm, xK_F2), spawn "gmrun") >> , ((modm, xK_f), spawn "/home/firefox/firefox") >> , ((modm, xK_t), spawn "thunderbird") >> --, ((modm, xK_p), spawn "exe=`dmenu_path | dmenu -b` && eval >> \"exec $exe\"") >> , ((modm, xK_F11), spawn "sudo shutdown -r now") >> , ((modm, xK_F12), spawn "sudo shutdown -h now") >> , ((modm .|. controlMask, xK_Print), spawn "sleep 0.2; scrot >> -s") >> , ((modm, xK_Print), spawn "scrot >> '/tmp/%Y-%m-%d_%H:%M:%S_$wx$h_scrot.png' -e 'mv $f ~'") >> , ((modm, xK_c), kill) >> -- Window Navigation >> , ((modm, xK_Right), sendMessage $ Go R) >> , ((modm, xK_Left ), sendMessage $ Go L) >> , ((modm, xK_Up ), sendMessage $ Go U) >> , ((modm, xK_Down ), sendMessage $ Go D) >> -- swap... >> , ((modm .|. controlMask, xK_Right), sendMessage $ Swap R) >> , ((modm .|. controlMask, xK_Left ), sendMessage $ Swap L) >> , ((modm .|. controlMask, xK_Up ), sendMessage $ Swap U) >> , ((modm .|. controlMask, xK_Down ), sendMessage $ Swap D) >> ] >> >> ----- >> fac n = foldr (*) 1 [1..n] >> -- >> View this message in context: >> http://old.nabble.com/About-xmonad-tp26367498p26367498.html >> Sent from the Haskell - Haskell-Cafe mailing list archive at Nabble.com. >> >> _______________________________________________ >> Haskell-Cafe mailing list >> [email protected] >> http://www.haskell.org/mailman/listinfo/haskell-cafe >> > > You should try asking on the xmonad mailing list: > http://www.haskell.org/mailman/listinfo/xmonad > > -- > Deniz Dogan > _______________________________________________ > Haskell-Cafe mailing list > [email protected] > http://www.haskell.org/mailman/listinfo/haskell-cafe > > ----- fac n = foldr (*) 1 [1..n] -- View this message in context: http://old.nabble.com/About-xmonad-tp26367498p26370168.html Sent from the Haskell - Haskell-Cafe mailing list archive at Nabble.com. _______________________________________________ Haskell-Cafe mailing list [email protected] http://www.haskell.org/mailman/listinfo/haskell-cafe
