folkert/import-style-guide
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Update styling

Browse Source
This commit is contained in:
Folkert Kevelam 2025-06-06 18:08:13 +02:00
parent 24bdb39d40
commit c26c69b476
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
source/pandoc.adb
View File

@ -50,7 +50,7 @@ package body Pandoc is
Block.Insert ( Block.Insert (
Type_String, Type_String,
League.JSON.Values.To_JSON_Value ( League.JSON.Values.To_JSON_Value (
Obj_String_Representation (Block_Div) To_String (Block_Div)
) )
); );
@ -80,7 +80,7 @@ package body Pandoc is
Block.Insert ( Block.Insert (
Type_String, Type_String,
League.JSON.Values.To_JSON_Value ( League.JSON.Values.To_JSON_Value (
Obj_String_Representation (Block_Div) To_String (Block_Div)
) )
); );
@ -106,7 +106,7 @@ begin
for Key in Object_Type loop for Key in Object_Type loop
declare declare
Str_Rep : constant League.Strings.Universal_String := Str_Rep : constant League.Strings.Universal_String :=
Obj_String_Representation (Key); To_String (Key);
begin begin
Type_Mapping.Insert (Str_Rep, Key); Type_Mapping.Insert (Str_Rep, Key);
end; end;