SafeToExpression bug fix

Uses TraditionalForm

Author: phil-ramsden

preview.m

@@ -34,8 +34,8 @@
     ]
   ];
 
-  latexString = ToString[ToExpression[ToString[parsedResponse,InputForm],TraditionalForm]/.activeFunctionRules, TeXForm];
-  wolframString = ToString[ToExpression[ToString[parsedResponse,InputForm],TraditionalForm]/.activeFunctionRules];
+    latexString = ToString[parsedResponse/.activeFunctionRules, TeXForm];
+  wolframString = ToString[parsedResponse/.activeFunctionRules];
 
   <|
         "latex" -> latexString,
@@ -67,7 +67,7 @@
 
     (* Try to parse the expression safely *)
     result = Quiet @ Check[
-      ToExpression[str, InputForm, Hold],
+      ToExpression[str, TraditionalForm, Hold],
       Return["Error: Failed to parse expression"]
     ];