diff options
Diffstat (limited to 'portal/tcp/portal_tcp.ml')
| -rw-r--r-- | portal/tcp/portal_tcp.ml | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/portal/tcp/portal_tcp.ml b/portal/tcp/portal_tcp.ml index cfe35dd..3aa5e56 100644 --- a/portal/tcp/portal_tcp.ml +++ b/portal/tcp/portal_tcp.ml @@ -1,8 +1,8 @@ -let xmpp_port (_domain : string) : int = 5222 - (** [xmpp_port domain] is the port where [domain]'s XMPP server is hosted. +(** [xmpp_port domain] is the port where [domain]'s XMPP server is hosted. - Currently, it falls back to 5222 (always), but should use SRV records in the near - future. *) + Currently, it falls back to 5222 (always), but should use SRV records in the near + future. *) +let xmpp_port (_domain : string) : int = 5222 let connect (domain : string) = xmpp_port domain |> string_of_int |> print_endline |