version 1.460, 2009/11/18 20:47:52
|
version 1.461, 2009/12/06 21:18:24
|
Line 254 sub page_start {
|
Line 254 sub page_start {
|
my $page_start = &Apache::loncommon::start_page($name,$extra_head, |
my $page_start = &Apache::loncommon::start_page($name,$extra_head, |
\%body_args); |
\%body_args); |
$page_start .= $pageheader; |
$page_start .= $pageheader; |
if (!defined($found{'body'}) |
|
&& $env{'request.state'} ne 'construct' |
unless ($env{'request.gcicontext'} eq 'buildtest') { |
&& ($target eq 'web' || $target eq 'webgrade')) { |
if (!defined($found{'body'}) |
|
&& $env{'request.state'} ne 'construct' |
my ($symb,undef,undef,undef,$publicuser)= &Apache::lonnet::whichuser(); |
&& ($target eq 'web' || $target eq 'webgrade')) { |
if ($symb eq '' && !$publicuser) { |
|
$page_start .= '<p class="LC_info">' |
my ($symb,undef,undef,undef,$publicuser)= &Apache::lonnet::whichuser(); |
.&mt('Browsing resource, all submissions are temporary.') |
if ($symb eq '' && !$publicuser) { |
.'</p>'; |
$page_start .= '<p class="LC_info">' |
|
.&mt('Browsing resource, all submissions are temporary.') |
|
.'</p>'; |
|
} |
} |
} |
} |
} |
|
|
Line 914 sub start_problem {
|
Line 917 sub start_problem {
|
if ($env{'request.state'} ne "construct" && |
if ($env{'request.state'} ne "construct" && |
($symb eq '' || $Apache::lonhomework::type eq 'practice')) { |
($symb eq '' || $Apache::lonhomework::type eq 'practice')) { |
$form_tag_start.='<input type="hidden" name="rndseed" value="'. |
$form_tag_start.='<input type="hidden" name="rndseed" value="'. |
$rndseed.'" />'. |
$rndseed.'" />'; |
'<input type="submit" name="resetdata" |
unless ($env{'request.gcicontext'} eq 'buildtest') { |
value="'.&mt('New Problem Variation').'" />'; |
$form_tag_start .= '<input type="submit" name="resetdata"'. |
|
' value="'.&mt('New Problem Variation').'" />'; |
|
} |
if (exists($env{'form.username'})) { |
if (exists($env{'form.username'})) { |
$form_tag_start.= |
$form_tag_start.= |
'<input type="hidden" name="username" |
'<input type="hidden" name="username" |
value="'.$env{'form.username'}.'" />'; |
value="'.$env{'form.username'}.'" />'; |
} |
} |
if ($env{'request.role.adv'}) { |
unless ($env{'request.gcicontext'} eq 'buildtest') { |
$form_tag_start.= ' <label class="LC_nobreak">' |
if ($env{'request.role.adv'}) { |
.'<input type="checkbox" name="showallfoils"'; |
$form_tag_start.= ' <label class="LC_nobreak">' |
if (defined($env{'form.showallfoils'})) { |
.'<input type="checkbox" name="showallfoils"'; |
$form_tag_start.=' checked="checked"'; |
if (defined($env{'form.showallfoils'})) { |
} |
$form_tag_start.=' checked="checked"'; |
$form_tag_start.= ' /> ' |
} |
.&mt('Show All Foils') |
$form_tag_start.= ' /> ' |
.'</label>'; |
.&mt('Show All Foils') |
} |
.'</label>'; |
|
} |
|
} |
if ($Apache::lonhomework::type eq 'practice') { |
if ($Apache::lonhomework::type eq 'practice') { |
$form_tag_start.=&practice_problem_header(); |
$form_tag_start.=&practice_problem_header(); |
} |
} |
$form_tag_start.='<hr />'; |
unless ($env{'request.gcicontext'} eq 'buildtest') { |
|
$form_tag_start.='<hr />'; |
|
} |
} |
} |
|
|
($status,$accessmsg,my $slot_name,my $slot) = |
($status,$accessmsg,my $slot_name,my $slot) = |