Changed context of activeFunctionRules

Author: phil-ramsden

preview.m

@@ -43,8 +43,6 @@
     |>
 ];
 
-Begin["`Private`"];
-
 activeFunctionRules = {
 	sin -> Sin, cos -> Cos, tan -> Tan, sec -> Sec, Cosec -> Csc, csc -> Csc, cosec -> Csc, cot -> Cot, 
 	arcsin -> ArcSin, asin -> ArcSin, arccos -> ArcCos, acos -> ArcCos, arctan -> ArcTan, atan -> ArcTan, 
@@ -57,6 +55,8 @@
 	arccoth -> ArcCoth, acoth -> ArcCoth,
 	exp -> Exp, log -> Log, ln -> Log};
 
+Begin["`Private`"];
+
 SafeToExpression[str_String] :=
   Module[{expr, result},
     (* First check for obviously dangerous patterns in the raw string *)