Re: [Catalyst] Catalyst::Engine::CGI::prepare_path port

2007-02-15 Thread Jim Spath
Jim Spath wrote: Jim Spath wrote: I was wondering why Catalyst::Engine::CGI::prepare_path() ignores the port in the Host header and instead uses $ENV{SERVER_PORT}. my $scheme = $c->request->secure ? 'https' : 'http'; my $host = $ENV{HTTP_HOST} || $ENV{SERVER_NAME}; my $port

Re: [Catalyst] Catalyst::Engine::CGI::prepare_path port

2007-02-15 Thread Jim Spath
Jim Spath wrote: I was wondering why Catalyst::Engine::CGI::prepare_path() ignores the port in the Host header and instead uses $ENV{SERVER_PORT}. my $scheme = $c->request->secure ? 'https' : 'http'; my $host = $ENV{HTTP_HOST} || $ENV{SERVER_NAME}; my $port = $ENV{SERVER

[Catalyst] Catalyst::Engine::CGI::prepare_path port

2007-02-15 Thread Jim Spath
I was wondering why Catalyst::Engine::CGI::prepare_path() ignores the port in the Host header and instead uses $ENV{SERVER_PORT}. my $scheme = $c->request->secure ? 'https' : 'http'; my $host = $ENV{HTTP_HOST} || $ENV{SERVER_NAME}; my $port = $ENV{SERVER_PORT} || 80;