version 1.111.2.13.2.2, 2022/07/08 16:29:33
|
version 1.141, 2022/09/13 12:22:15
|
Line 383 ENDEXT
|
Line 383 ENDEXT
|
} elsif ($cellemb{$_} eq 'ssi') { |
} elsif ($cellemb{$_} eq 'ssi') { |
# --------------------------------------------------------- This is an SSI cell |
# --------------------------------------------------------- This is an SSI cell |
my $prefix='p_'.$_.'_'; |
my $prefix='p_'.$_.'_'; |
my $idprefix='p_'.join('_',($mapid,$resid,'')); |
my $idprefix= 'p_'.join('_',($mapid,$resid,'')); |
my %posthash=('request.prefix' => $prefix, |
my %posthash=('request.prefix' => $prefix, |
'LONCAPA_INTERNAL_no_discussion' => 'true', |
'LONCAPA_INTERNAL_no_discussion' => 'true', |
'symb' => $symb); |
'symb' => $symb); |
Line 421 ENDEXT
|
Line 421 ENDEXT
|
} elsif ($env{'form.'.$prefix.'markaccess'} eq 'yes') { |
} elsif ($env{'form.'.$prefix.'markaccess'} eq 'yes') { |
$posthash{'markaccess'} = $env{'form.'.$prefix.'markaccess'}; |
$posthash{'markaccess'} = $env{'form.'.$prefix.'markaccess'}; |
} |
} |
if ($env{'environment.remote'} eq 'on') { |
|
$posthash{'inhibitmenu'} = 'yes'; |
|
} |
|
my $output=Apache::lonnet::ssi($src,%posthash); |
my $output=Apache::lonnet::ssi($src,%posthash); |
$output=~s|//(\s*<!--)? BEGIN LON-CAPA Internal.+?// END LON-CAPA Internal\s*(-->)?\s||gs; |
$output=~s|//(\s*<!--)? BEGIN LON-CAPA Internal.+?// END LON-CAPA Internal\s*(-->)?\s||gs; |
if (($target eq 'tex') || ($target eq 'tex_answer')) { |
if (($target eq 'tex') || ($target eq 'tex_answer')) { |
Line 692 ENDEXT
|
Line 689 ENDEXT
|
&Apache::loncommon::content_type($r,'text/html'); |
&Apache::loncommon::content_type($r,'text/html'); |
$r->send_http_header; |
$r->send_http_header; |
$r->print(&Apache::loncommon::start_page(undef,undef, |
$r->print(&Apache::loncommon::start_page(undef,undef, |
{'force_register' => 1})); |
{'force_register' => 1,})); |
$r->print(&mt('This page is either empty or it only contains resources that are currently hidden').'. '); |
$r->print(&mt('This page is either empty or it only contains resources that are currently hidden').'. '); |
$r->print('<br /><br />'.&mt('Please use the LON-CAPA navigation arrows to move to another item in the course'). |
$r->print('<br /><br />'.&mt('Please use the LON-CAPA navigation arrows to move to another item in the course'). |
&Apache::loncommon::end_page()); |
&Apache::loncommon::end_page()); |
Line 745 ENDEXT
|
Line 742 ENDEXT
|
$uniquetimes{$item} = 1; |
$uniquetimes{$item} = 1; |
} |
} |
} |
} |
if (scalar(keys(%uniquetimes)) == 1) { |
if (scalar(keys(%uniquetimes)) == 1) { |
my (%uniquedisplays,%uniquedones,$currdisp,$donebuttontime, |
my (%uniquedisplays,%uniquedones,$currdisp,$donebuttontime, |
$donebuttonextras); |
$donebuttonextras); |
if (keys(%countdowndisp)) { |
if (keys(%countdowndisp)) { |
Line 996 sub get_buttons {
|
Line 993 sub get_buttons {
|
my $symb=&Apache::lonnet::encode_symb($hash->{'map_id_'.$mapid}, |
my $symb=&Apache::lonnet::encode_symb($hash->{'map_id_'.$mapid}, |
$resid, |
$resid, |
$hash->{'src_'.$rid}); |
$hash->{'src_'.$rid}); |
my $aname; |
my ($aname,$shownsymb); |
if (($hash->{'encrypted_'.$rid}) && (!$env{'request.role.adv'})) { |
if (($hash->{'encrypted_'.$rid}) && (!$env{'request.role.adv'})) { |
$aname = 'LC_'.$rid; |
$aname = 'LC_'.$rid; |
|
$shownsymb = &Apache::lonenc::encrypted($symb); |
} else { |
} else { |
my $shownsymb = $symb; |
$shownsymb = $symb; |
|
my $dispsymb = $symb; |
if ($symb =~ /\#([^\#]+)$/) { |
if ($symb =~ /\#([^\#]+)$/) { |
my $escan = &escape('#'); |
my $escan = &escape('#'); |
$shownsymb =~ s/#([^\#]+)$/$escan$1/; |
$dispsymb =~ s/#([^\#]+)$/$escan$1/; |
} |
} |
$aname = &escape($shownsymb); |
$aname = &escape($dispsymb); |
} |
} |
my $metainfo = '<a name="'.$aname.'"></a>'; |
my $metainfo = '<a name="'.$aname.'"></a>'; |
unless ($env{'request.role.adv'}) { |
unless ($env{'request.role.adv'}) { |
Line 1088 sub get_buttons {
|
Line 1087 sub get_buttons {
|
&Apache::lonnet::can_edit_resource($file,$cnum,$cdom,$hash->{'src_'.$rid},$symb); |
&Apache::lonnet::can_edit_resource($file,$cnum,$cdom,$hash->{'src_'.$rid},$symb); |
if ($cfile ne '') { |
if ($cfile ne '') { |
my $jscall = &Apache::lonhtmlcommon::jump_to_editres($cfile,$home,$switchserver, |
my $jscall = &Apache::lonhtmlcommon::jump_to_editres($cfile,$home,$switchserver, |
$forceedit,1,$symb,undef, |
$forceedit,1,$symb,$shownsymb, |
&escape($env{'form.title'}), |
undef,&escape($env{'form.title'}), |
$hostname); |
$hostname); |
if ($jscall) { |
if ($jscall) { |
$editbutton = 1; |
$editbutton = 1; |
Line 1160 sub add_countdown_timer {
|
Line 1159 sub add_countdown_timer {
|
$donebuttontext = &mt('Done'); |
$donebuttontext = &mt('Done'); |
$type = 'map'; |
$type = 'map'; |
} |
} |
$donebutton = |
$donebutton = |
&Apache::lonmenu::done_button_js($type,'','',$proctor,$donebuttontext); |
&Apache::lonmenu::done_button_js($type,'','',$proctor,$donebuttontext); |
} |
} |
unless ($env{'environment.icons'} eq 'iconsonly') { |
unless ($env{'environment.icons'} eq 'iconsonly') { |