From e174c73fabde0efde74a68ba0114399a5165c40e Mon Sep 17 00:00:00 2001
From: malc <av1474@comtv.ru>
Date: Mon, 15 Aug 2011 22:30:13 +0400
Subject: [PATCH] No reason to store fractional parts of zoom

---
 main.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/main.ml b/main.ml
index 20395fe..0aec963 100644
--- a/main.ml
+++ b/main.ml
@@ -3543,7 +3543,7 @@ struct
       then Printf.bprintf bb "\n    %s='%d'" s a
     and oz s a b =
       if always || a <> b
-      then Printf.bprintf bb "\n    %s='%f'" s (a*.100.)
+      then Printf.bprintf bb "\n    %s='%d'" s (truncate (a*.100.))
     and oc s a b =
       if always || a <> b
       then
-- 
2.11.4.GIT