Fix mouse position conversion in case of BottomToTop text

Change-Id: Ib058e44a1480013ce924585d8950534d0f3fc5a4
Reviewed-on: https://gerrit.libreoffice.org/36834
Tested-by: Jenkins <ci@libreoffice.org>
Reviewed-by: Tamás Zolnai <tamas.zolnai@collabora.com>
(cherry picked from commit c0d09cc0e7ee12ac6dcc144e06855ba4621e4144)
Reviewed-on: https://gerrit.libreoffice.org/36888
Reviewed-by: Andras Timar <andras.timar@collabora.com>
Tested-by: Andras Timar <andras.timar@collabora.com>

1 files changed, 10 insertions, 2 deletions

diff --git a/editeng/source/editeng/editeng.cxx b/editeng/source/editeng/editeng.cxx
index 5f88c0e36a10..0accd5a69303 100644
--- a/editeng/source/editeng/editeng.cxx
+++ b/editeng/source/editeng/editeng.cxx
@@ -1916,8 +1916,16 @@ Point EditEngine::GetDocPos( const Point& rPaperPos ) const
     Point aDocPos( rPaperPos );
     if ( IsVertical() )
     {
-        aDocPos.X() = rPaperPos.Y();
-        aDocPos.Y() = GetPaperSize().Width() - rPaperPos.X();
+        if ( IsTopToBottom() )
+        {
+            aDocPos.X() = rPaperPos.Y();
+            aDocPos.Y() = GetPaperSize().Width() - rPaperPos.X();
+        }
+        else
+        {
+            aDocPos.X() = rPaperPos.Y();
+            aDocPos.Y() = rPaperPos.X();
+        }
     }
     return aDocPos;
 }