1 files changed, 2 insertions, 2 deletions
diff --git a/expression.ml b/expression.ml
index c61131e..31b6369 100755
--- a/expression.ml
+++ b/expression.ml
@@ -35,8 +35,8 @@ let load content = begin
         with Not_found -> content in
         try
           let ScTypes.Result r =
-            Lexing.from_string content'
-                |> ExpressionParser.content ExpressionLexer.read in
+               ExpressionParser.content ExpressionLexer.read
+            @@ Lexing.from_string content' in
           Basic r
         with _ -> Basic (ScTypes.Str (UTF8.from_utf8string content'))
     )