loncom/xml/lonxml.pm - diff

Return to lonxml.pm CVS log

Up to [LON-CAPA] / loncom / xml

version 1.253, 2003/05/16 20:47:07	version 1.254, 2003/05/16 20:51:25
Line 1129 sub inserteditinfo {	Line 1129 sub inserteditinfo {
&Apache::loncommon::help_open_topic("Other_Symbols",'Other Symbols',	&Apache::loncommon::help_open_topic("Other_Symbols",'Other Symbols',
undef,undef,600)	undef,undef,600)
.'</td></tr></table>';	.'</td></tr></table>';
	my $titledisplay=&display_title();
my $buttons=(<<BUTTONS);	my $buttons=(<<BUTTONS);
<input type="submit" name="attemptclean"	<input type="submit" name="attemptclean"
value="Save and then attempt to clean HTML" />	value="Save and then attempt to clean HTML" />
Line 1146 $buttons<br />	Line 1147 $buttons<br />
<br />$buttons	<br />$buttons
<br />	<br />
</form>	</form>
	$titledisplay
ENDFOOTER	ENDFOOTER
# $result=~s/(\<body[^\>]*\>)/$1$editheader/is;	# $result=~s/(\<body[^\>]*\>)/$1$editheader/is;
$result=~s/(\<\/body\>)/$editfooter/is;	$result=~s/(\<\/body\>)/$editfooter/is;