loncom/homework/lonhomework.pm - diff

Return to lonhomework.pm CVS log

Up to [LON-CAPA] / loncom / homework

Diff for /loncom/homework/lonhomework.pm between versions 1.317.4.1 and 1.319

version 1.317.4.1, 2010/08/13 01:33:48	version 1.319, 2010/03/16 19:55:37
Line 111 sub get_target {	Line 111 sub get_target {
} elsif ( $env{'form.grade_target'} eq 'webgrade'	} elsif ( $env{'form.grade_target'} eq 'webgrade'
&& ($Apache::lonhomework::queuegrade eq 'F' )) {	&& ($Apache::lonhomework::queuegrade eq 'F' )) {
return ($env{'form.grade_target'});	return ($env{'form.grade_target'});
} elsif ($env{'form.grade_target'} eq 'answer') {	}
if ($env{'form.answer_output_mode'} eq 'tex') {
return ($env{'form.grade_target'});
}
}
if ($env{'form.webgrade'} &&	if ($env{'form.webgrade'} &&
($Apache::lonhomework::modifygrades eq 'F'	($Apache::lonhomework::modifygrades eq 'F'
\|\| $Apache::lonhomework::queuegrade eq 'F' )) {	\|\| $Apache::lonhomework::queuegrade eq 'F' )) {
Line 174 sub setup_vars {	Line 170 sub setup_vars {
# return ';$external::target='.$target.';';	# return ';$external::target='.$target.';';
}	}

sub createmenu {
my ($which,$request)=@_;
if ($which eq 'grade') {
$request->print('<script type="text/javascript" language="JavaScript">
hwkmenu=window.open("/res/adm/pages/homeworkmenu.html","homeworkremote",
"height=350,width=150,menubar=no");
</script>');
}
}

sub proctor_checked_in {	sub proctor_checked_in {
my ($slot_name,$slot,$type)=@_;	my ($slot_name,$slot,$type)=@_;
my @possible_proctors=split(",",$slot->{'proctor'});	my @possible_proctors=split(",",$slot->{'proctor'});
Line 927 sub editxmlmode {	Line 913 sub editxmlmode {
&Apache::loncommon::resize_textarea_js().	&Apache::loncommon::resize_textarea_js().
&Apache::structuretags::setmode_javascript().	&Apache::structuretags::setmode_javascript().
&Apache::lonhtmlcommon::dragmath_js("EditMathPopup");	&Apache::lonhtmlcommon::dragmath_js("EditMathPopup");
my $only_body = ($env{'environment.remote'} eq 'off')? 0 : 1;
my $dragmath_button =	my $dragmath_button =
&Apache::lonhtmlcommon::dragmath_button("LC_editxmltext",1);	&Apache::lonhtmlcommon::dragmath_button("LC_editxmltext",1);

Line 940 sub editxmlmode {	Line 925 sub editxmlmode {
my $start_page =	my $start_page =
&Apache::loncommon::start_page(&mt("EditXML [_1]",$file),$js,	&Apache::loncommon::start_page(&mt("EditXML [_1]",$file),$js,
{'no_auto_mt_title' => 1,	{'no_auto_mt_title' => 1,
'only_body' => $only_body,	'only_body' => 0,
'add_entries' => {	'add_entries' => {
'onresize' => q[resize_textarea('LC_editxmltext','LC_aftertextarea')],	'onresize' => q[resize_textarea('LC_editxmltext','LC_aftertextarea')],
'onload' => q[resize_textarea('LC_editxmltext','LC_aftertextarea')],	'onload' => q[resize_textarea('LC_editxmltext','LC_aftertextarea')],

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

Removed from v.1.317.4.1
changed lines
	Added in v.1.319