hide orders menu when moving ship (issue #49)

thindil · Nov 7, 2019 · 5bf7b44 · 5bf7b44
1 parent 8e4d0e9
commit 5bf7b44
Showing 1 changed file with 3 additions and 0 deletions.
diff --git a/src/ui/maps-ui-handlers.adb b/src/ui/maps-ui-handlers.adb
@@ -291,6 +291,9 @@ package body Maps.UI.Handlers is
       StartsCombat: Boolean := False;
       NewX, NewY: Integer := 0;
    begin
+      if Is_Visible(Gtk_Widget(Get_Object(Builder, "btnboxorders"))) then
+         Hide(Gtk_Widget(Get_Object(Builder, "btnboxorders")));
+      end if;
       if User_Data = Get_Object(Builder, "btnup") then -- Move up
          Result := MoveShip(0, -1, Message);
       elsif User_Data = Get_Object(Builder, "btnbottom") then -- Move down