loncom/homework/structuretags.pm - diff

Return to structuretags.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.394, 2007/09/10 16:25:38	version 1.395, 2007/09/10 17:02:32
Line 1142 sub start_languageblock {	Line 1142 sub start_languageblock {
my $exclude = $token->[2]->{'exclude'};	my $exclude = $token->[2]->{'exclude'};
my $preferred_language=(&Apache::loncommon::preferred_languages)[0];	my $preferred_language=(&Apache::loncommon::preferred_languages)[0];
# This should not even happen, since we should at least have the server language	# This should not even happen, since we should at least have the server language
unless ($preferred_language) { $preferred_language='en'; }	if (!$preferred_language) { $preferred_language='en'; }
# If the languageblock has no arguments, show the contents	# If the languageblock has no arguments, show the contents
$result='1';	$result='1';
# Do we have an include argument?	# Do we have an include argument?