Skip to content

Commit

Permalink
style: code formatting
Browse files Browse the repository at this point in the history
FossilOrigin-Name: 54a64e30f4ae8e77d2ec6d9133bd05ebe683fd210b508e793646595e7ead5390
  • Loading branch information
thindil committed Jan 7, 2024
1 parent 87b7628 commit 1a04bb6
Show file tree
Hide file tree
Showing 2 changed files with 7 additions and 4 deletions.
3 changes: 2 additions & 1 deletion src/ui/gameoptions.adb
Original file line number Diff line number Diff line change
Expand Up @@ -778,7 +778,8 @@ package body GameOptions is
Accels(I + 11).Shortcut :=
To_Unbounded_String(Source => Get_Map_Accelerator(Index => I));
end loop Load_Map_Accelerators_Loop;
Accels(11 + 37 + 1).Shortcut := To_Unbounded_String(Source => Get_Full_Screen_Accel);
Accels(11 + 37 + 1).Shortcut :=
To_Unbounded_String(Source => Get_Full_Screen_Accel);
Load_General_Accelerators_Loop :
for I in 1 .. 4 loop
Accels(I + 11 + 37 + 1).Shortcut :=
Expand Down
8 changes: 5 additions & 3 deletions src/ui/maps-ui.adb
Original file line number Diff line number Diff line change
Expand Up @@ -1245,11 +1245,13 @@ package body Maps.UI is
To_String
(Source =>
Insert
(Source => To_Unbounded_String(Source => Get_Full_Screen_Accel),
(Source =>
To_Unbounded_String(Source => Get_Full_Screen_Accel),
Before =>
Index
(Source => To_Unbounded_String(Source => Get_Full_Screen_Accel), Pattern => "-",
Going => Backward) +
(Source =>
To_Unbounded_String(Source => Get_Full_Screen_Accel),
Pattern => "-", Going => Backward) +
1,
New_Item => "KeyPress-")) &
">",
Expand Down

0 comments on commit 1a04bb6

Please sign in to comment.