From 68ab71a8b69b0bc8d9a2e7e59256251ab24f00b4 Mon Sep 17 00:00:00 2001
From: malc <av1474@comtv.ru>
Date: Wed, 29 Feb 2012 19:59:15 +0400
Subject: [PATCH] Fix text positioning in textentry mode

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

diff --git a/main.ml b/main.ml
index 91211f3..4e65ea4 100644
--- a/main.ml
+++ b/main.ml
@@ -1796,6 +1796,7 @@ let enttext () =
   let drawstring s =
     let hscrollh =
       match state.mode with
+      | Textentry _
       | View -> state.hscrollh
       | _ -> 0
     in
-- 
2.11.4.GIT