From 0d1f399d86a408ea2f1565a48cf08728645fa2f9 Mon Sep 17 00:00:00 2001
From: malc <av1474@comtv.ru>
Date: Thu, 17 Jan 2013 01:23:53 +0400
Subject: [PATCH] Cosmetics

---
 main.ml | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/main.ml b/main.ml
index df91c59..3c092c1 100644
--- a/main.ml
+++ b/main.ml
@@ -2527,9 +2527,9 @@ let act cmds =
       let top, dtop =
         if conf.presentation
         then (0.0, 1.0)
-        else float t, 0.0
+        else float t /. float h, 0.0
       in
-      state.anchor <- (n, top /. float h, dtop)
+      state.anchor <- (n, top, dtop)
 
   | "info" ->
       state.docinfo <- (1, args) :: state.docinfo
-- 
2.11.4.GIT