Merge pull request #962 from WolframResearch/bugfix/454752

Fix for extra whitespace in W|A tool outputs
WolframResearch · Nov 28, 2024 · 3e422ba · 3e422ba
2 parents e33a804 + 90758bd
commit 3e422ba
Show file tree

Hide file tree

Showing 2 changed files with 9 additions and 3 deletions.
diff --git a/PacletInfo.wl b/PacletInfo.wl
@@ -1,7 +1,7 @@
 PacletObject[ <|
     "Name"           -> "Wolfram/Chatbook",
     "PublisherID"    -> "Wolfram",
-    "Version"        -> "1.5.2.13",
+    "Version"        -> "1.5.2.14",
     "WolframVersion" -> "14.1+",
     "Description"    -> "Wolfram Notebooks + LLMs",
     "License"        -> "MIT",

diff --git a/Source/Chatbook/Formatting.wl b/Source/Chatbook/Formatting.wl
@@ -1806,9 +1806,15 @@ makeToolCallOutputSection // beginDefinition;
 makeToolCallOutputSection[ as: KeyValuePattern[ "Result" -> result_ ] ] := Enclose[
     Module[ { formatter },
         formatter = Confirm[ as[ "FormattingFunction" ], "FormattingFunction" ];
-        TextCell[ wideScrollPane @ formatter[ result, "Result" ], "Text", Background -> None ]
+        TextCell[
+            wideScrollPane @ formatter[ result, "Result" ],
+            "Text",
+            Background      -> None,
+            FrameBoxOptions -> { BaselinePosition -> Automatic },
+            PaneBoxOptions  -> { BaselinePosition -> Automatic }
+        ]
     ],
-    throwInternalFailure[ makeToolCallOutputSection @ as, ## ] &
+    throwInternalFailure
 ];
 
 makeToolCallOutputSection // endDefinition;