Add function for manual log tests

src/grisp_connect.erl

@@ -5,6 +5,8 @@
 
 -module(grisp_connect).
 
+-include_lib("kernel/include/logger.hrl").
+
 %--- Exports -------------------------------------------------------------------
 
 % API functions
@@ -14,6 +16,7 @@
 -export([link_device/0]).
 -export([link_device/1]).
 -export([log/2]).
+-export([test_log_encoding/0]).
 
 %--- API Functions -------------------------------------------------------------
 
@@ -51,3 +54,13 @@ link_device(Token) ->
 
 % @doc Log from inside grisp_connect for testing.
 log(Level, Args) -> apply(logger, Level, Args).
+
+% @doc For manually testing the log encoding.
+% Alternative to shell commands. The shell double encodes unicode strings.
+test_log_encoding() ->
+    String = "@#$%^&*()_ +{}|:\"<>?-[];'./,\\`~!\néäüßóçøáîùêñÄÖÜÉÁÍÓÚàèìòùÂÊÎÔÛ",
+    Binary = <<"@#$%^&*()_ +{}|:\"<>?-[];'./,\\`~!\néäüßóçøáîùêñÄÖÜÉÁÍÓÚàèìòùÂÊÎÔÛ"/utf8>>,
+    ?LOG_NOTICE("List:\n" ++ String),
+    ?LOG_NOTICE(<<"Binary: \n", Binary/binary>>),
+    ?LOG_NOTICE("List:~n~tp~nBinary:~n~tp~n", [String, Binary]),
+    ?LOG_NOTICE(#{list => String, binary => Binary}).