From 8cc5a157428535cf01a5464b1f4395def7e9583b Mon Sep 17 00:00:00 2001
From: FellippeHeitor <fellippeheitor@gmail.com>
Date: Sun, 8 Dec 2019 11:53:19 -0300
Subject: [PATCH] Fixes menu glith reported in #107

---
 source/ide/ide_methods.bas | 21 +++++++++++++++++++--
 1 file changed, 19 insertions(+), 2 deletions(-)

diff --git a/source/ide/ide_methods.bas b/source/ide/ide_methods.bas
index 5161dd7b0..fd18960b5 100644
--- a/source/ide/ide_methods.bas
+++ b/source/ide/ide_methods.bas
@@ -4127,8 +4127,20 @@ FUNCTION ide2 (ignore)
     s = 0
     parentMenu = 0
     parentMenuSetup%% = 0
-    IF idecontextualmenu = 1 THEN idectxmenuX = mX: idectxmenuY = mY: m = idecontextualmenuID
-    IF idecontextualmenu = 2 THEN idectxmenuX = xx + w + 3: idectxmenuY = yy + r: parentMenu = m: m = ViewMenuShowLineNumbersSubMenuID
+    SELECT CASE idecontextualmenu
+        CASE 1
+            'right-click on text area
+            idectxmenuX = mX
+            idectxmenuY = mY
+            m = idecontextualmenuID
+        CASE 2
+            'line numbers menu item in View menu
+            idectxmenuX = xx + w + 3
+            idectxmenuY = yy + r
+            parentMenu = m
+            m = ViewMenuShowLineNumbersSubMenuID
+    END SELECT
+
     IdeMakeEditMenu
 
     IF totalWarnings = 0 THEN
@@ -4298,6 +4310,7 @@ FUNCTION ide2 (ignore)
                 m = parentMenu
                 r = parentMenuR
                 parentMenu = 0
+                parentMenuR = 0
                 idecontextualmenu = 0
                 PCOPY 3, 2
                 _CONTINUE
@@ -4308,6 +4321,7 @@ FUNCTION ide2 (ignore)
                 GOTO ideloop
             END IF
         END IF
+
         IF NOT mouseup AND NOT mousedown THEN 'Check if we're hovering on menu options
             IF parentMenu > 0 AND oldmy <> mY AND oldmx <> mX AND _
                mX >= backToParent.x1 AND mX =< backToParent.x2 AND _
@@ -4315,6 +4329,7 @@ FUNCTION ide2 (ignore)
                 m = parentMenu
                 r = parentMenuR
                 parentMenu = 0
+                parentMenuR = 0
                 idecontextualmenu = 0
                 PCOPY 3, 2
                 _CONTINUE
@@ -4342,6 +4357,8 @@ FUNCTION ide2 (ignore)
                         IF mX >= x AND mX < x2 THEN
                             m = i
                             r = 1
+                            parentMenuR = 0
+                            parentMenu = 0
                             IF idecontextualmenu > 1 THEN idecontextualmenu = 0: PCOPY 3, 2
                             EXIT FOR
                         END IF