Ticket #2902: mythweb.diff
File mythweb.diff, 609 bytes (added by , 17 years ago) |
---|
-
modules/stream/handler.pl
67 67 my $uri = ($ENV{'HTTPS'} || $ENV{'SERVER_PORT'} == 443) 68 68 ? 'https' 69 69 : 'http'; 70 $uri .= '://'.$ENV{'SERVER_ ADDR'}.':'.$ENV{'SERVER_PORT'}70 $uri .= '://'.$ENV{'SERVER_NAME'}.':'.$ENV{'SERVER_PORT'} 71 71 .$ENV{'REQUEST_URI'}; 72 72 $uri =~ s/\.asx$//i; 73 73 # Build the ASX file so we can know how long it is