anchor.diff:  is_compile_opt(_) -> false.
   
   
  +%% @doc When SSL is not enabled, then remove any ssl option from all dispatch rules.
  +filter_ssl(true, Rules) ->
  +    Rules;
  +filter_ssl(_, Rules) ->
  +    filter_ssl_hosts(Rules).
  +
  +    filter_ssl_hosts(DLs) ->
  +        filter_ssl_hosts(DLs, []).
  +
  +    filter_ssl_hosts([], Acc) ->
  +        lists:reverse(Acc);
  +    filter_ssl_hosts([#wm_host_dispatch_list{dispatch_list=DispatchList} = DL|Rest], Acc) ->
  +        DispatchList1 = filter_ssl_hosts_dispatch(DispatchList, []),
  +        filter_ssl_hosts(Rest, [DL#wm_host_dispatch_list{dispatch_list=DispatchList1}|Acc]).
  +
  +    filter_ssl_hosts_dispatch([], Acc) ->
  +        lists:reverse(Acc);
  +    filter_ssl_hosts_dispatch([{DispatchName, PathSchema, Mod, Props}|Rest], Acc) ->
  +        Props1 = proplists:delete(ssl, Props),
  +        filter_ssl_hosts_dispatch(Rest, [{DispatchName, PathSchema, Mod, Props1}|Acc]).
  +
  +
   %%%%%%% Adapted version of Webmachine dispatcher %%%%%%%%
   % Main difference is that we want to know which dispatch rule was choosen.
   % We also added check functions and regular expressions to match vars.
  
positive.code: 
  
  %% @doc Redirect to another host name.
  redirect(ProtocolAsString, Hostname, ReqData) ->
      RawPath = wrq:raw_path(ReqData),
      Uri = ProtocolAsString ++ "://" ++ Hostname ++ RawPath,
      RD1 = wrq:set_resp_header("Location", Uri, ReqData),
      {ok, RD2} = webmachine_request:send_response(301, RD1),
      LogData = webmachine_request:log_data(RD2),
      LogModule = 
          case application:get_env(webmachine,webmachine_logger_module) of
  
negative.code:         {ok, Remainder, NewBindings, Depth} ->
              case {proplists:get_value(ssl, Props), IsSSL} of
                  {undefined, true} ->
                      %Port = z_config:get(listen_port),
                      %Host1 = set_port(Port, HostAsString),
                      {Host1, _Port} = split_host(HostAsString),
                      {redirect, "http", Host1};
                  {false, true} ->
                      %Port = z_config:get(listen_port),
                      %Host1 = set_port(Port, HostAsString),
                      {Host1, _Port} = split_host(HostAsString),
                      {redirect, "http", Host1};            
                  {true, false} ->
                      %Port = z_config:get(listen_port_ssl),
                      %Host1 = set_port(Port, HostAsString),
                      {Host1, _Port} = split_host(HostAsString),
                      {redirect, "https", Host1};
  