From: Tonu Naks <naks@adacore.com>
Date: Fri, 4 Apr 2025 14:38:35 +0000 (+0000)
Subject: ada: Fix support e-mail addresses
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=04223dc18c626eb6e841e2c0bf3cb1fa91c9ed91;p=thirdparty%2Fgcc.git

ada: Fix support e-mail addresses

gcc/ada/ChangeLog:

	* comperr.adb: replace report@ with support@
	* gnatcmd.adb: replace report@ with support@
---

diff --git a/gcc/ada/comperr.adb b/gcc/ada/comperr.adb
index 180ea94353e..60afd04c399 100644
--- a/gcc/ada/comperr.adb
+++ b/gcc/ada/comperr.adb
@@ -307,7 +307,7 @@ package body Comperr is
 
                   Write_Str
                     ("| Please submit a bug report by email " &
-                     "to report@adacore.com.");
+                     "to support@adacore.com.");
                   End_Line;
 
                   Write_Str
@@ -336,7 +336,7 @@ package body Comperr is
 
                   Write_Str
                     ("| Or submit a bug report by email " &
-                     "to report@adacore.com");
+                     "to support@adacore.com");
                   End_Line;
 
                   Write_Str
diff --git a/gcc/ada/gnatcmd.adb b/gcc/ada/gnatcmd.adb
index 546dbca87f4..5e3802e7f8a 100644
--- a/gcc/ada/gnatcmd.adb
+++ b/gcc/ada/gnatcmd.adb
@@ -368,7 +368,7 @@ begin
          --  --help flag.
          Set_Standard_Output;
          Write_Eol;
-         Write_Line ("Report bugs to report@adacore.com");
+         Write_Line ("Report bugs to support@adacore.com");
          return;
       end if;