loncom/interface/lonhtmlcommon.pm - diff

Return to lonhtmlcommon.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.285, 2011/01/03 13:10:12	version 1.285.2.2, 2011/10/11 13:12:23
Line 60 use Time::Local;	Line 60 use Time::Local;
use Time::HiRes;	use Time::HiRes;
use Apache::lonlocal;	use Apache::lonlocal;
use Apache::lonnet;	use Apache::lonnet;
	use HTML::Entities();
use LONCAPA;	use LONCAPA;

sub java_not_enabled {	sub java_not_enabled {
Line 83 sub raw_href_to_link {	Line 84 sub raw_href_to_link {
return $message;	return $message;
}	}

	sub entity_encode {
	my ($text)=@_;
	return &HTML::Entities::encode($text, '<>&"');
	}

##############################################	##############################################
##############################################	##############################################

Line 1611 returns: nothing	Line 1617 returns: nothing
@html = grep {defined $_ && $_ ne ''} @html;	@html = grep {defined $_ && $_ ne ''} @html;
for (@html) {	for (@html) {
s/align="(right\|left)"//;	s/align="(right\|left)"//;
s/<span.*?\/span>// if $category ne 'advtools';	if (($category ne 'advtools') && ($category ne 'tools')) {
	s/<span.*?\/span>//;
	}
}	}

push @{$tools{$category}}, @html;	push @{$tools{$category}}, @html;