ada/gnatstudio
0
0
Fork 0
mirror of https://github.com/AdaCore/gnatstudio.git synced 2026-02-12 12:42:33 -08:00
Code Issues Packages Projects Releases Wiki Activity

Replace use of "CodePeer" in pragma Annotate and review dialog

Browse Source
This commit is contained in:
Guillaume Rivier
2023-10-25 19:48:57 +09:00
parent bfd515964f
commit e6f62c3a12
2 changed files with 4 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
code_analysis/src/codepeer-module.adb
View File

@@ -1780,7 +1780,8 @@ package body CodePeer.Module is
Editor.Insert
(Location.End_Of_Line, ASCII.LF &
"pragma Annotate" & ASCII.LF &
"(CodePeer, False_Positive, """ &
"(" & CodePeer.Module_Name &
", False_Positive, """ &
To_String (Message.Category.Name) &
""", ""<insert review>"");");
Editor.Indent (Location, Location.Forward_Line (2));

4
code_analysis/src/codepeer-multiple_message_review_dialogs.adb
View File

@@ -191,11 +191,11 @@ package body CodePeer.Multiple_Message_Review_Dialogs is
GPS.Dialogs.Initialize
(Self,
Title => -"CodePeer message review",
Title => -(CodePeer.Module_Name & " message review"),
Kernel => Kernel,
Typ => Class_Record.The_Type);
GPS.Main_Window.Set_Default_Size_From_History
(Self, "CodePeer message review", Kernel, 400, 400);
(Self, CodePeer.Module_Name & " message review", Kernel, 400, 400);
Gtk.Paned.Gtk_New_Vpaned (Paned_1);
Self.Get_Content_Area.Pack_Start (Paned_1);