loncom/homework/structuretags.pm - diff

Return to structuretags.pm CVS log

Up to [LON-CAPA] / loncom / homework

Diff for /loncom/homework/structuretags.pm between versions 1.420 and 1.422

version 1.420, 2008/05/27 19:48:55	version 1.422, 2008/05/28 01:32:55
Line 451 $show_all	Line 451 $show_all
$show_all	$show_all
";	";
}	}
if (($env{'form.problemlanguage'}) && ($env{'form.problemlanguage'}!~/notset/)) {
$env{'environment.languages'}=$env{'form.problemlanguage'};
}
my %langchoices=('' => '');
foreach (&Apache::loncommon::languageids()) {
if (&Apache::loncommon::supportedlanguagecode($_)) {
$langchoices{&Apache::loncommon::supportedlanguagecode($_)}
= &Apache::loncommon::plainlanguagedescription($_);
}
}
$result.='	$result.='
<span class="LC_nobreak">	<span class="LC_nobreak">
'.&mt('Apply style file: ').'	'.&mt('Apply style file: ').'
<input type="text" name="style_file" value="'.&HTML::Entities::encode($env{'construct.style'},'"<>&').'" />	<input type="text" name="style_file" value="'.&HTML::Entities::encode($env{'construct.style'},'"<>&').'" />
<a href="javascript:openbrowser(\'lonhomework\',\'style_file\',\'sty\')">'.&mt('Select').'</a>	<a href="javascript:openbrowser(\'lonhomework\',\'style_file\',\'sty\')">'.&mt('Select').'</a>
</span>	</span>
</div><div class="LC_edit_problem_header_row1">	</div>
<span class="LC_nobreak">'.	<div class="LC_edit_problem_header_row1">'.
&mt('Language: ').	&Apache::lonxml::renderingoptions().'
&Apache::loncommon::select_form($env{'environment.languages'},'problemlanguage',
%langchoices).'
</span>
</div>	</div>
<input type="submit" name="changeproblemmode" value="'.&mt("Change View").'" />	<input type="submit" name="changeproblemmode" value="'.&mt("Change View").'" />
<input type="submit" name="clear_style_file" accesskey="d" value="'.&mt('Show Default View').'" />	<input type="submit" name="clear_style_file" accesskey="d" value="'.&mt('Show Default View').'" />

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>

Removed from v.1.420
changed lines
	Added in v.1.422