From f402b8dae45408c89c6b56dbd9bf78acc27e3517 Mon Sep 17 00:00:00 2001 From: malc Date: Sat, 6 Aug 2011 11:35:52 +0400 Subject: [PATCH] Sanitize width on rehsape --- main.ml | 1 + 1 file changed, 1 insertion(+) diff --git a/main.ml b/main.ml index d0e5867..d67cc5f 100644 --- a/main.ml +++ b/main.ml @@ -619,6 +619,7 @@ let winmatrix () = let reshape ~w ~h = conf.winw <- w; let w = truncate (float w *. conf.zoom) - conf.scrollw in + let w = max w 2 in state.w <- w; conf.winh <- h; GlMat.mode `modelview; -- 2.11.4.GIT