From 9e1d91169b53f1fb4351b7bb079fd00d94dc086a Mon Sep 17 00:00:00 2001 From: malc Date: Thu, 25 Oct 2012 01:58:52 +0400 Subject: [PATCH] Respect ghyll for g Also fuse g/home and G/end --- main.ml | 10 ++-------- 1 file changed, 2 insertions(+), 8 deletions(-) diff --git a/main.ml b/main.ml index bae9ea2..66a3b0a 100644 --- a/main.ml +++ b/main.ml @@ -4950,12 +4950,6 @@ let viewkeyboard key mask = doreshape w h end - | 103 -> (* g *) - gotoy_and_clear_text 0 - - | 71 -> (* G *) - gotopage1 (state.pagecount - 1) 0 - | 112 | 78 -> (* p|N *) search state.searchpattern false @@ -5204,9 +5198,9 @@ let viewkeyboard key mask = in gotoghyll y - | 0xff50 -> (* home *) + | 103 | 0xff50 -> (* g home *) gotoghyll 0 - | 0xff57 -> (* end *) + | 71 | 0xff57 -> (* G end *) gotoghyll (clamp state.maxy) | 0xff53 when Wsi.withalt mask -> (* right *) gotoghyll (getnav ~-1) -- 2.11.4.GIT