From c26c69b4767e56f2af641704b6b52f47f2569f7c Mon Sep 17 00:00:00 2001
From: Folkert Kevelam <contact@pyllr.nl>
Date: Fri, 6 Jun 2025 18:08:13 +0200
Subject: [PATCH] Update styling

---
 source/pandoc.adb | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/source/pandoc.adb b/source/pandoc.adb
index 296c6ac..f8a792e 100644
--- a/source/pandoc.adb
+++ b/source/pandoc.adb
@@ -50,7 +50,7 @@ package body Pandoc is
       Block.Insert (
          Type_String,
          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 (
          Type_String,
          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
       declare
          Str_Rep : constant League.Strings.Universal_String :=
-           Obj_String_Representation (Key);
+           To_String (Key);
       begin
          Type_Mapping.Insert (Str_Rep, Key);
       end;