File tree Expand file tree Collapse file tree 2 files changed +4
-3
lines changed
testsuite/tests/T121-017.run_in_exec_dir_aggregated_project Expand file tree Collapse file tree 2 files changed +4
-3
lines changed Original file line number Diff line number Diff line change @@ -719,7 +719,8 @@ package body Builder_Facility_Module is
719
719
Action_Name => N & (-" Number" ) & J'Img,
720
720
Multiple_Mains => True,
721
721
Button_Label => Mains.List (J).Tuple (2 ).Str,
722
- Menu_Name => Mains.List (J).Tuple (1 ).Str,
722
+ Menu_Name =>
723
+ N & ' ' & Mains.List (J).Tuple (1 ).Str,
723
724
Show_Project_In_Menu => Show_Project_In_Menu,
724
725
For_Learning => For_Learning);
725
726
end if ;
Original file line number Diff line number Diff line change 10
10
class RunMainDialog (Dialog ):
11
11
12
12
def open_and_yield (self ):
13
- yield self ._open_and_yield ("/Build/Run/P1/main1" )
13
+ yield self ._open_and_yield ("/Build/Run/P1/Run Main main1" )
14
14
self .dialog = get_window_by_title ("Run Main" )
15
15
yield wait_tasks ()
16
16
@@ -40,7 +40,7 @@ def driver():
40
40
exec_path = text .splitlines ()[0 ]
41
41
work_dir = text .splitlines ()[1 ]
42
42
exec_name = exec_path [len (work_dir )+ 1 :]
43
- gps_assert (exec_name .startswith (' main1' ),
43
+ gps_assert (exec_name .startswith (" main1" ),
44
44
True ,
45
45
"Wrong name of the executable '{}', path '{}', cwd '{}'" .format (
46
46
exec_name , exec_path , work_dir ))
You can’t perform that action at this time.
0 commit comments