diff options
Diffstat (limited to '')
-rw-r--r-- | src/XMonad/Custom/Bindings.hs | 10 | ||||
-rw-r--r-- | src/XMonad/Custom/Theme.hs | 2 |
2 files changed, 6 insertions, 6 deletions
diff --git a/src/XMonad/Custom/Bindings.hs b/src/XMonad/Custom/Bindings.hs index 9400de7..772b0ad 100644 --- a/src/XMonad/Custom/Bindings.hs +++ b/src/XMonad/Custom/Bindings.hs @@ -54,7 +54,6 @@ import XMonad.Prompt.Shell import XMonad.Prompt.Window import XMonad.Prompt.Workspace import qualified XMonad.StackSet as S -import XMonad.Util.ALSA import XMonad.Util.EZConfig import XMonad.Util.NamedScratchpad import XMonad.Util.WorkspaceCompare @@ -147,10 +146,11 @@ keysSystem _ = keysMedia :: XConfig Layout -> [(String, X ())] keysMedia _ = - [ ("<XF86AudioMute>" , void toggleMute) - , ("<XF86AudioLowerVolume>" , void $ lowerVolume 5) - , ("<XF86AudioRaiseVolume>" , void $ raiseVolume 5) - , ("<XF86AudioPlay>" , spawn "~/.xmonad/scripts/mpc-play-pause.sh") + [ + -- , ("<XF86AudioMute>" , void toggleMute) + -- , ("<XF86AudioLowerVolume>" , void $ lowerVolume 5) + -- , ("<XF86AudioRaiseVolume>" , void $ raiseVolume 5) + ("<XF86AudioPlay>" , spawn "~/.xmonad/scripts/mpc-play-pause.sh") , ("<XF86AudioStop>" , spawn "mpc --no-status stop") , ("<XF86AudioPrev>" , spawn "mpc --no-status prev") , ("<XF86AudioNext>" , spawn "mpc --no-status next") diff --git a/src/XMonad/Custom/Theme.hs b/src/XMonad/Custom/Theme.hs index ed3cb8d..d25cb55 100644 --- a/src/XMonad/Custom/Theme.hs +++ b/src/XMonad/Custom/Theme.hs @@ -46,7 +46,7 @@ import XMonad.Layout.Decoration import qualified XMonad.Prompt as P font :: String -font = "xft:lucy tewi:style=Regular:size=8" -- TODO CJKのフォールバックフォントを追加する +font = "xft:tewi:style=Regular:size=8" -- TODO CJKのフォールバックフォントを追加する black1, black2 :: String -- TODO get variables from Xresources (black1, black2) = |