From faabd61254d88700f7da150449818dc197c2f7d8 Mon Sep 17 00:00:00 2001 From: malc Date: Sat, 21 Jun 2014 12:57:41 +0400 Subject: [PATCH] Uh... even more massage --- main.ml | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/main.ml b/main.ml index aff6dba..8b3ff78 100644 --- a/main.ml +++ b/main.ml @@ -2065,8 +2065,9 @@ let gotoghyll1 single y = let (_N, _A, _B), y = if single then - let scl = if y > sy then 3 else -3 in - (5,1,4), y+conf.scrollstep*scl + let scl = if y > sy then 2 else -2 in + let _N, _, _ = nab in + (_N,0,_N), y+conf.scrollstep*scl else nab,y in let sum = summa _N _A _B in let dy = float (y - sy) in -- 2.11.4.GIT