have a to_json/1 function which just does the string form

```erlang
to_json (Event) ->
  to_json (Event, json_typed_string).
```