gel.demo.mouse_selection: Rid redundant procedure calls.

2023-12-20 18:04:31 +11:00
parent d6ad5d67c5
commit 7af505bc05
1 changed files with 0 additions and 3 deletions
--- a/4-high/gel/applet/demo/mouse/mouse_selection/launch_mouse_selection.adb
+++ b/4-high/gel/applet/demo/mouse/mouse_selection/launch_mouse_selection.adb
@@ -108,10 +108,7 @@ begin

      while the_Applet.is_open
      loop
-         the_Applet.gui_World.evolve;
-         the_Ball.respond;
         the_Applet.freshen;
-
         next_render_Time := next_render_Time + gel.World.evolve_Period;
         delay until next_render_Time;
      end loop;