From 5b3307b32f88c391ef65b7683b4178229e3bae24 Mon Sep 17 00:00:00 2001
From: Jed Barber <jjbarber@y7mail.com>
Date: Sat, 4 Nov 2017 11:04:16 +1100
Subject: Removed use of obsolescent ASCII and replaced with
 Ada.Characters.Latin_1

---
 src/candidates-containers.adb | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'src/candidates-containers.adb')

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;
-- 
cgit