diff options
Diffstat (limited to 'test/native')
| -rw-r--r-- | test/native/native_hello.ml | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/test/native/native_hello.ml b/test/native/native_hello.ml index ea57e57..bb38ee6 100644 --- a/test/native/native_hello.ml +++ b/test/native/native_hello.ml @@ -1,2 +1,5 @@ let () = - print_endline "Hello, world!" + let jid = Sys.getenv "FLESH_JID" + and _password = Sys.getenv "FLESH_PASSWORD" + in let domain = (List.nth (String.split_on_char '@' jid) 1) + in print_endline domain |