End_Line;
Write_Str
- ("| GAP members can alternatively use GNAT Tracker:");
+ ("| GAP members can alternatively use GNATtracker:");
End_Line;
Write_Str
- ("| https://www.adacore.com/login?mode=gap " &
- "section 'Create New Ticket'.");
+ ("| https://support.adacore.com/csm " &
+ "by using the button 'Create A New Case'.");
End_Line;
Write_Str
else
Write_Str
- ("| Please submit a bug report using GNAT Tracker:");
+ ("| Please submit a bug report using GNATtracker at");
End_Line;
Write_Str
- ("| https://www.adacore.com/login " &
- "section 'Create New Ticket'.");
+ ("| https://support.adacore.com/csm " &
+ "by using the button 'Create New Case'.");
End_Line;
Write_Str
Set_Standard_Output;
Usage;
Write_Eol;
- Write_Line ("Report bugs to report@adacore.com");
+ Write_Line ("Report bugs to support@adacore.com");
Exit_Program (E_Success);
end if;
end Check_Version_And_Help_G;