aboutsummaryrefslogtreecommitdiff
path: root/src/Rahm/Desktop/KeysM.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Rahm/Desktop/KeysM.hs')
-rw-r--r--src/Rahm/Desktop/KeysM.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Rahm/Desktop/KeysM.hs b/src/Rahm/Desktop/KeysM.hs
index dcbce2a..403b3fc 100644
--- a/src/Rahm/Desktop/KeysM.hs
+++ b/src/Rahm/Desktop/KeysM.hs
@@ -470,7 +470,7 @@ documentation = execWriter . document' ""
group (\(_, Documented doc _) -> doc) (sortOn (snd . fst) $ Map.toList b)
prettyShow :: (KeyMask, KeySym) -> String
- prettyShow (mask, key) = printf "<%s%s>" (showMask mask) (keysymToString key)
+ prettyShow (mask, key) = printf "%s%s" (showMask mask) (keysymToString key)
hasSubmap b = case b of
Action _ -> False