loncom/xml/lonxml.pm - diff

Return to lonxml.pm CVS log

Up to [LON-CAPA] / loncom / xml

version 1.348, 2004/11/30 22:57:16	version 1.349, 2004/12/03 22:14:22
Line 1338 ENDNOTFOUND	Line 1338 ENDNOTFOUND
if ($ENV{'form.editmode'} && (!($ENV{'form.viewmode'}))) {	if ($ENV{'form.editmode'} && (!($ENV{'form.viewmode'}))) {
my $displayfile=$request->uri;	my $displayfile=$request->uri;
$displayfile=~s/^\/[^\/]*//;	$displayfile=~s/^\/[^\/]*//;
$result='<html><body bgcolor="#FFFFFF">'.	my $bodytag='<body bgcolor="#FFFFFF">';
	if ($ENV{'environment.remote'} eq 'off') {
	$bodytag=&Apache::loncommon::bodytag();
	}
	$result='<html>'.$bodytag.
&Apache::lonxml::message_location().'<h3>'.	&Apache::lonxml::message_location().'<h3>'.
$displayfile.	$displayfile.
'</h3></body></html>';	'</h3></body></html>';