summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authortv <tv@krebsco.de>2026-04-02 05:55:52 +0200
committertv <tv@krebsco.de>2026-04-02 05:55:52 +0200
commitd6991df61643a8730f771efbebf0059ad086e6f3 (patch)
tree9107f710b23b8ee36d37b8b753a4533bfba41dfc
parentfd4c3dc8a0114f529dc6d6f53f9175c9c646205c (diff)
app: map SS3-style F1/F2HEADmaster
-rw-r--r--app/much.hs2
1 files changed, 2 insertions, 0 deletions
diff --git a/app/much.hs b/app/much.hs
index aba074c..7f9ff4e 100644
--- a/app/much.hs
+++ b/app/much.hs
@@ -98,10 +98,12 @@ myKeymap "=" = \q@State{..} ->
bf = BreakFormat 80 8 shy hyp
-- <F1>
+myKeymap "\ESCOP" = myKeymap "\ESC[11~"
myKeymap "\ESC[11~" = \q@State{..} ->
return q { flashMessage = fromString $ show $ treeViewId $ Z.label cursor }
-- <F2>
+myKeymap "\ESCOQ" = myKeymap "\ESC[12~"
myKeymap "\ESC[12~" = \q@State{..} ->
return q { flashMessage =
fromString $