diff --git a/design/forum/awfc/awfc-page_generators.adb b/design/forum/awfc/awfc-page_generators.adb index 8e74b07c5..4352673ce 100644 --- a/design/forum/awfc/awfc-page_generators.adb +++ b/design/forum/awfc/awfc-page_generators.adb @@ -8,7 +8,7 @@ -- -- ------------------------------------------------------------------------------ -- -- --- Copyright © 2015-2019, Vadim Godunko -- +-- Copyright © 2015-2021, Vadim Godunko -- -- All rights reserved. -- -- -- -- Redistribution and use in source and binary forms, with or without -- @@ -54,6 +54,8 @@ with XML.SAX.String_Output_Destinations; package body AWFC.Page_Generators is + use type League.Strings.Universal_String; + function "+" (Item : Wide_Wide_String) return League.Strings.Universal_String renames League.Strings.To_Universal_String; @@ -328,7 +330,6 @@ package body AWFC.Page_Generators is procedure Process_Head is use Constants; - use type League.Strings.Universal_String; Title_Item : XML_Stream_Element; Title_Text : League.Strings.Universal_String;