loncom/interface/coursecatalog.pm - diff

Return to coursecatalog.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.9, 2006/10/18 13:52:17	version 1.10, 2006/10/18 14:07:47
Line 456 sub build_courseinfo_hash {	Line 456 sub build_courseinfo_hash {
}	}
my $cleandesc=&HTML::Entities::encode($descr,'<>&"');	my $cleandesc=&HTML::Entities::encode($descr,'<>&"');
$cleandesc=~s/'/\\'/g;	$cleandesc=~s/'/\\'/g;
	$cleandesc =~ s/^\s+//;
my ($cdom,$cnum)=split(/\_/,$course);	my ($cdom,$cnum)=split(/\_/,$course);

my ($desc,$instcode,$owner,$ttype) = split(/:/,$courses{$course});	my ($desc,$instcode,$owner,$ttype) = split(/:/,$courses{$course});