binding only to localhost

[Anniepoo]

from swish
handy way to bind only to localhost

%% server is det.
%% server(?Port) is det.
%
% Start the web-server on Port. Port may be unbound to make the
% system select a free port. Port can also be of the form
% localhost:Port to bind the server only to the localhost
% interface.

server :-
server(localhost:3050).
server(Port) :-
http_server(http_dispatch,
[ port(Port),
workers(16)
]).