Removed use of obsolescent ASCII and replaced with Ada.Characters.Latin_1HEADmaster

1 files changed, 2 insertions, 1 deletions

diff --git a/src/candidates-containers.adb b/src/candidates-containers.adb
index b9b56c7..995c45d 100644
--- a/src/candidates-containers.adb
+++ b/src/candidates-containers.adb
@@ -2,6 +2,7 @@
 
 with
 
+    Ada.Characters.Latin_1,
     Ada.Containers.Vectors,
     Ada.Text_IO,
     CSV;
@@ -197,7 +198,7 @@ package body Candidates.Containers is
             for Box of CandidateID_Map_Maps.Element (Group_Cursor) loop
                 SU.Append (Result, CandidateID'Image (Box) & " ");
             end loop;
-            SU.Append (Result, ASCII.LF);
+            SU.Append (Result, Ada.Characters.Latin_1.LF);
         end loop;
         return SU.To_String (Result);
     end To_String;