anchor.diff:  
   init([]) ->
       case cowboy:start_http(http, 100, [{port, wf:config(n2o,port,port())}],
  -                                    [{env, [{dispatch, dispatch_rules()}]}]) of
  +            [
  +                {env, [{dispatch, dispatch_rules()}]},
  +                {onrequest, fun ?MODULE:https_redirection_hook/1}
  +            ]) of
           {ok, _} -> ok;
           {error,{{_,{_,_,{X,_}}},_}} -> io:format("Can't start Web Server: ~p\r\n",[X]), halt(abort,[]);
           X -> io:format("Unknown Error: ~p\r\n",[X]), halt(abort,[]) end,
  
positive.code:             Port;
          Other ->
              list_to_integer(Other)
      end.
negative.code:             {"/rest/:resource/:id", rest_cowboy, []},
              {"/ws/[...]", bullet_handler, [{handler, n2o_bullet}]},
              {'_', n2o_cowboy, []}
      ]}]).
  
  port() ->
      case os:getenv("PORT") of
  