version 1.49.2.7.2.5, 2020/10/26 00:02:48
|
version 1.49.2.7.2.6, 2021/10/19 11:27:51
|
Line 56 sub wrapper {
|
Line 56 sub wrapper {
|
'show' => 'Show content in pop-up window', |
'show' => 'Show content in pop-up window', |
); |
); |
|
|
|
(undef,undef,undef,undef,undef,undef,my $clientmobile) = |
|
&Apache::loncommon::decode_user_agent($r); |
|
|
my ($anchor,$uselink); |
my ($anchor,$uselink); |
if ($is_ext) { |
if ($is_ext) { |
if ($env{'form.symb'}) { |
if ($env{'form.symb'}) { |
Line 66 sub wrapper {
|
Line 69 sub wrapper {
|
} elsif ($env{'form.anchor'} ne '') { |
} elsif ($env{'form.anchor'} ne '') { |
$anchor = '#'.$env{'form.anchor'}; |
$anchor = '#'.$env{'form.anchor'}; |
} |
} |
unless (($is_pdf) && ($env{'browser.mobile'})) { |
unless (($is_pdf) && ($clientmobile)) { |
my $hostname = $r->hostname(); |
my $hostname = $r->hostname(); |
my $lonhost = $r->dir_config('lonHostID'); |
my $lonhost = $r->dir_config('lonHostID'); |
my $ip = &Apache::lonnet::get_host_ip($lonhost); |
my $ip = &Apache::lonnet::get_host_ip($lonhost); |
Line 98 sub wrapper {
|
Line 101 sub wrapper {
|
# do not obscure the Functions menu. |
# do not obscure the Functions menu. |
# |
# |
|
|
unless (($env{'browser.mobile'}) || ($exttool eq 'window') || ($exttool eq 'tab') || $uselink) { |
unless ($clientmobile || ($exttool eq 'window') || ($exttool eq 'tab') || $uselink) { |
$headjs = ' |
$headjs = ' |
<script type="text/javascript"> |
<script type="text/javascript"> |
// <![CDATA[ |
// <![CDATA[ |
Line 121 var LCresizedef = 0;
|
Line 124 var LCresizedef = 0;
|
} |
} |
} |
} |
} |
} |
if (($env{'browser.mobile'}) || ($exttool eq 'window') || ($exttool eq 'tab')) { |
if ($clientmobile || ($exttool eq 'window') || ($exttool eq 'tab')) { |
my $output = $startpage; |
my $output = $startpage; |
if ($is_pdf) { |
if ($is_pdf) { |
$linktext = &mt('Link to PDF (for mobile devices)'); |
$linktext = &mt('Link to PDF (for mobile devices)'); |
Line 457 true if URL is for a PDF (based on file
|
Line 460 true if URL is for a PDF (based on file
|
|
|
=item $title |
=item $title |
|
|
optional. If wrapped item is a PDF, and $env{'browser.mobile'} |
optional. If wrapped item is a PDF, and $clientmobile is true, |
is true, a link to a PDF is shown. The "title" will be displayed |
a link to a PDF is shown. The "title" will be displayed |
above the link, but if not provided as an arg, $env{'form.title'} |
above the link, but if not provided as an arg, $env{'form.title'} |
will be used, otherwise, the filename will be displayed (unless |
will be used, otherwise, the filename will be displayed (unless |
hidden URL set for the resource). |
hidden URL set for the resource). |