Fullscreen float for xmonad and adding mail to conky
This commit is contained in:
16
conky
16
conky
@@ -48,6 +48,20 @@ ${endif}\
|
||||
${endif}\
|
||||
Ñ ^fg(white)${cpu}% \
|
||||
#
|
||||
# Memory
|
||||
# Memory TODO COLORS!
|
||||
^fg(\#66aaff)Î ^fg(white)${memperc}% \
|
||||
#
|
||||
# Mail dustinswan@gmail.com
|
||||
${if_match ${new_mails /home/dustinswan/.mail/DustinswanGmail/INBOX} == 0}^fg(\#66aaff)\
|
||||
${else}^fg(\#ff0000)\
|
||||
${endif}\
|
||||
Ë ^fg(white)${new_mails /home/dustinswan/.mail/DustinswanGmail/INBOX} \
|
||||
#
|
||||
# Mail dswan@iocom.com
|
||||
${if_match ${new_mails /home/dustinswan/.mail/DswanIOCOM/INBOX} == 0}^fg(\#66aaff)\
|
||||
${else}^fg(\#ff0000)\
|
||||
${endif}\
|
||||
Ë ^fg(white)${new_mails /home/dustinswan/.mail/DswanIOCOM/INBOX} \
|
||||
#
|
||||
# Clock
|
||||
^fg(\#66aaff)É ^fg(white)${time %d %b %R} \
|
||||
|
||||
@@ -6,6 +6,7 @@ import qualified Data.Map as M
|
||||
|
||||
import XMonad.Hooks.DynamicLog
|
||||
import XMonad.Hooks.ManageDocks
|
||||
import XMonad.Hooks.ManageHelpers (doFullFloat, isFullscreen)
|
||||
|
||||
import XMonad.Util.Run (spawnPipe) -- for spawnPipe and hPutStrLn
|
||||
import qualified System.IO
|
||||
@@ -24,6 +25,7 @@ myModMask = mod4Mask -- command
|
||||
myManageHook = composeAll
|
||||
[ resource =? "visimeet" --> doFloat
|
||||
, resource =? "feh" --> doFloat
|
||||
, isFullscreen --> doFullFloat
|
||||
]
|
||||
|
||||
--myWorkspaces = [ "!" , "@" , "#" , "$" , "%", "^^", "&", "*", "(" ]
|
||||
|
||||
Reference in New Issue
Block a user