version 1.135, 2020/03/04 16:33:31
|
version 1.138, 2020/03/06 20:04:01
|
Line 368 sub handler {
|
Line 368 sub handler {
|
if (($hash{'encrypted_'.$_}) && ($symb) && (!$env{'request.role.adv'})) { |
if (($hash{'encrypted_'.$_}) && ($symb) && (!$env{'request.role.adv'})) { |
$showsrc .= '?symb='.&Apache::lonenc::encrypted($symb); |
$showsrc .= '?symb='.&Apache::lonenc::encrypted($symb); |
} elsif ($anchor) { |
} elsif ($anchor) { |
$showsrc .= $anchor |
$showsrc .= $anchor; |
} |
} |
$ssibody{$_} = <<ENDEXT; |
$ssibody{$_} = <<ENDEXT; |
<iframe src="$showsrc" width="100%" height="300px">No iframe support!</iframe> |
<iframe src="$showsrc" width="100%" height="300px">No iframe support!</iframe> |
Line 939 ENDEXT
|
Line 939 ENDEXT
|
sub get_buttons { |
sub get_buttons { |
my ($hash,$rid,$buttonshide,$hostname) = @_; |
my ($hash,$rid,$buttonshide,$hostname) = @_; |
|
|
my $metainfo = ''; |
|
my $esrc=&Apache::lonnet::declutter($hash->{'src_'.$rid}); |
|
my ($mapid,$resid)=split(/\./,$rid); |
my ($mapid,$resid)=split(/\./,$rid); |
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; |
|
if (($hash->{'encrypted_'.$rid}) && (!$env{'request.role.adv'})) { |
|
$aname = 'LC_'.$rid; |
|
} else { |
|
my $shownsymb = $symb; |
|
if ($symb =~ /\#([^\#]+)$/) { |
|
my $escan = &escape('#'); |
|
$shownsymb =~ s/#([^\#]+)$/$escan$1/; |
|
} |
|
$aname = &escape($shownsymb); |
|
} |
|
my $metainfo = '<a name="'.$aname.'"></a>'; |
unless ($env{'request.role.adv'}) { |
unless ($env{'request.role.adv'}) { |
if ($buttonshide->{$symb} eq 'yes') { |
if ($buttonshide->{$symb} eq 'yes') { |
return; |
return $metainfo; |
} |
} |
} |
} |
my $crs_sec = $env{'request.course.id'} . (($env{'request.course.sec'} ne '') |
my $crs_sec = $env{'request.course.id'} . (($env{'request.course.sec'} ne '') |
? "/$env{'request.course.sec'}" |
? "/$env{'request.course.sec'}" |
: ''); |
: ''); |
|
my $esrc=&Apache::lonnet::declutter($hash->{'src_'.$rid}); |
if ($hash->{'encrypted_'.$rid}) { |
if ($hash->{'encrypted_'.$rid}) { |
$esrc=&Apache::lonenc::encrypted($esrc); |
$esrc=&Apache::lonenc::encrypted($esrc); |
} |
} |
Line 961 sub get_buttons {
|
Line 972 sub get_buttons {
|
&& !$env{'request.enc'} |
&& !$env{'request.enc'} |
&& ($env{'request.role.adv'} |
&& ($env{'request.role.adv'} |
|| !$hash->{'encrypted_'.$rid})) { |
|| !$hash->{'encrypted_'.$rid})) { |
$metainfo .='<a name="'.&escape($symb).'"></a>'. |
$metainfo .= '<a href="'.$hash->{'src_'.$rid}.'.meta'.'" '. |
'<a href="'.$hash->{'src_'.$rid}.'.meta'.'" target="LONcatInfo">'. |
'target="LONcatInfo">'. |
'<img src="/res/adm/pages/catalog.png" class="LC_icon"'. |
'<img src="/res/adm/pages/catalog.png" class="LC_icon"'. |
' alt="'.&mt('Show Metadata').'"'. |
' alt="'.&mt('Show Metadata').'"'. |
' title="'.&mt('Show Metadata').'" />'. |
' title="'.&mt('Show Metadata').'" />'. |