Mercurial > pub > Impl
comparison Lib/IMPL/Web/QueryHandler/PageFormat.pm @ 137:6975cd4973d1
minor fix
author | wizard |
---|---|
date | Tue, 29 Jun 2010 00:37:05 +0400 |
parents | f6af119ac741 |
children | fb896377389f |
comparison
equal
deleted
inserted
replaced
136:f6af119ac741 | 137:6975cd4973d1 |
---|---|
44 | 44 |
45 if ( $requestUri eq $ENV{SCRIPT_NAME}.$ENV{PATH_INFO} ) { | 45 if ( $requestUri eq $ENV{SCRIPT_NAME}.$ENV{PATH_INFO} ) { |
46 # CGI with path info | 46 # CGI with path info |
47 $pathInfo = $ENV{PATH_INFO}; | 47 $pathInfo = $ENV{PATH_INFO}; |
48 } else { | 48 } else { |
49 die "REQUEST_URI: $ENV{REQUEST_URI}\nPATH_INFO: $ENV{PATH_INFO}" unless $ENV{REQUEST_URI} eq $ENV{PATH_INFO}; | 49 die "REQUEST_URI: $requestUri\nPATH_INFO: $ENV{PATH_INFO}" unless $requestUri eq $ENV{PATH_INFO}; |
50 } | 50 } |
51 | 51 |
52 my @root = (''); | 52 my @root = (''); |
53 my @base; | 53 my @base; |
54 | 54 |