diff options
| -rwxr-xr-x | extras/HOME/.xmonad/build | 2 | ||||
| -rw-r--r-- | src/Rahm/Desktop/Layout/ReinterpretMessage.hs | 4 | ||||
| -rw-r--r-- | src/Rahm/Desktop/XMobarLog.hs | 2 |
3 files changed, 4 insertions, 4 deletions
diff --git a/extras/HOME/.xmonad/build b/extras/HOME/.xmonad/build index 72b6310..484d580 100755 --- a/extras/HOME/.xmonad/build +++ b/extras/HOME/.xmonad/build @@ -14,4 +14,4 @@ fi cd "$olddir" -ln -sf "$HOME/.local/bin/jrahm-xmonad" "$1" +ln -sf "$HOME/.local/bin/rde" "$1" diff --git a/src/Rahm/Desktop/Layout/ReinterpretMessage.hs b/src/Rahm/Desktop/Layout/ReinterpretMessage.hs index 98bf779..8f6a78d 100644 --- a/src/Rahm/Desktop/Layout/ReinterpretMessage.hs +++ b/src/Rahm/Desktop/Layout/ReinterpretMessage.hs @@ -20,7 +20,7 @@ class DoReinterpret (k :: t) where -- Data construct for association a DoReinterpret function with a concrete -- construct that can be used in the LayoutModifier instance. -- --- It wolud be nice to have ReinterpretMessage hold the function as a value +-- It would be nice to have ReinterpretMessage hold the function as a value -- rather than delegate to this kind-instance, however, it won't work because -- LayoutModifiers have to be Read-able and Show-able, and functions are neither -- of those, so a value-level function may not be a member of a LayoutModifier, @@ -35,7 +35,7 @@ instance (DoReinterpret k) => handleMessOrMaybeModifyIt self message = do - -- Delegates to the reinterpretMessage function associatied with the + -- Delegates to the reinterpretMessage function associated with the -- type-variable k. newMessage <- reinterpretMessage (ofProxy self) message case newMessage of diff --git a/src/Rahm/Desktop/XMobarLog.hs b/src/Rahm/Desktop/XMobarLog.hs index 0f67ed4..4b266c1 100644 --- a/src/Rahm/Desktop/XMobarLog.hs +++ b/src/Rahm/Desktop/XMobarLog.hs @@ -65,7 +65,7 @@ xMobarLogHook (XMobarLog xmproc) = do toAction [ch] | (ch >= 'A' && ch <= 'Z') || (ch >= 'a' && ch <= 'z') || (ch >= '0' && ch <= '9') = - printf "<action=`xdotool key 'Hyper_L+g' '%s'`>%s</action>" [ch] [ch] + printf "<action=`xdotool key 'Hyper_L+g' '%s'` button=1><action=`xdotool key 'Hyper_L+Shift_L+g' '%s'` button=3>%s</action></action>" [ch] [ch] [ch] toAction ch = ch -- Truncate an XMobar string to the provided number of _visible_ characters. |