From 05ec52bacb33eff0bdf845a0ff37cf0a74b64846 Mon Sep 17 00:00:00 2001 From: malc Date: Tue, 11 Jun 2013 22:25:17 +0400 Subject: [PATCH] Split columns is not supported so drop pointless arithmetics --- main.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/main.ml b/main.ml index 2a0b1b0..577f9da 100644 --- a/main.ml +++ b/main.ml @@ -6024,7 +6024,7 @@ let zoomblock x y = let x1 = a.(1) +. 20. in let y0 = a.(2) -. 20. in let zoom = (float state.w) /. (x1 -. x0) in - let pagey = getpagey l.pageno + l.pageh*l.pagecol in + let pagey = getpagey l.pageno in gotoy_and_clear_text (pagey + truncate y0); state.anchor <- getanchor (); let margin = (state.w - l.pagew)/2 in -- 2.11.4.GIT