diff --git a/src/alr/alr-commands-show.adb b/src/alr/alr-commands-show.adb index 4730cd8a3..01fc1827a 100644 --- a/src/alr/alr-commands-show.adb +++ b/src/alr/alr-commands-show.adb @@ -13,6 +13,8 @@ with Alire.Solver; with Alire.Utils.Tables; with Alire.Utils.TTY; +with GNAT.IO; + with Semantic_Versioning.Extended; package body Alr.Commands.Show is @@ -232,14 +234,14 @@ package body Alr.Commands.Show is then Cmd.Root.Release else Cmd.Find_Target_Release (Name, Versions, Current)); begin - Put_Line ("---"); - Put_Line ("layout: crate"); + GNAT.IO.Put_Line ("---"); + GNAT.IO.Put_Line ("layout: crate"); -- TODO: conditional expressions can't be exported yet, we report in -- the interim the ones that apply to the current system. - Put_Line (Rel.Whenever (Platform.Properties).To_YAML); - Put_Line ("---"); - Put_Line (Rel.Long_Description); - Put_Line (Rel.Notes); + GNAT.IO.Put_Line (Rel.Whenever (Platform.Properties).To_YAML); + GNAT.IO.Put_Line ("---"); + GNAT.IO.Put_Line (Rel.Long_Description); + GNAT.IO.Put_Line (Rel.Notes); end; exception when Alire.Query_Unsuccessful =>