loncom/interface/lonevaluate.pm - diff

Return to lonevaluate.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.27, 2008/11/26 10:51:36	version 1.28, 2008/12/24 07:56:50
Line 48 sub handler {	Line 48 sub handler {

&Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'},['postdata']);	&Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'},['postdata']);
my $feedurl=$env{'form.postdata'};	my $feedurl=$env{'form.postdata'};
$feedurl=~s/^http\:\/\///;	$feedurl=~s/^https?\:\/\///;
$feedurl=~s/^$ENV{'SERVER_NAME'}//;	$feedurl=~s/^$ENV{'SERVER_NAME'}//;
$feedurl=~s/^$ENV{'HTTP_HOST'}//;	$feedurl=~s/^$ENV{'HTTP_HOST'}//;