That should fix the rightclick menu resizing issue

2 files changed, 8 insertions, 6 deletions

diff --git a/src/windows-editor.adb b/src/windows-editor.adb
index ca4bacf..fdf95c7 100644
--- a/src/windows-editor.adb
+++ b/src/windows-editor.adb
@@ -45,16 +45,19 @@ package body Windows.Editor is
                     Bar => MB.Menu_Bar'(MB.Create
                         (0, 0, Width, Menu_Height, "")),
                     Popup => MU.Menu_Button'(MU.Create
-                        (0, 0, Width, Height, ""))) do
+                        (0, Menu_Height, Width, Height - Menu_Height, ""))) do
 
+            This.Editor.Set_Text_Font (Courier);
             This.Add (This.Editor);
-            This.Add (This.Bar);
+
             This.Bar.Set_Box (No_Box);
-            This.Editor.Add (This.Popup);
+            This.Add (This.Bar);
+
+            This.Popup.Set_Box (No_Box);
             This.Popup.Set_Popup_Kind (MU.Popup3);
-            This.Editor.Set_Text_Font (Courier);
+            This.Add (This.Popup);
+
             This.Set_Resizable (This.Editor);
-            This.Editor.Set_Resizable (This.Popup);
             This.Set_Size_Range (Min_Editor_Width, Min_Editor_Height);
             This.Set_Icon (Logo);
         end return;
diff --git a/to_do.txt b/to_do.txt
index 918f4e6..8921ea9 100644
--- a/to_do.txt
+++ b/to_do.txt
@@ -3,7 +3,6 @@
 To Do:
 
 - change build to be dynamically linked
-- fix rightclick menu resizing
 - improve replace, undo/redo, jump to
 - grey out menu entries when appropriate
 - suppress unnecessary left/right scrollbar