version 1.619, 2023/04/03 19:53:30
|
version 1.620, 2023/05/22 21:10:55
|
Line 1849 sub print_row {
|
Line 1849 sub print_row {
|
$extra = 'ltid_'.$domltistr; |
$extra = 'ltid_'.$domltistr; |
} |
} |
} |
} |
my %courselti = &Apache::lonnet::get_course_lti($cnum,$cdom); |
my %courselti = &Apache::lonnet::get_course_lti($cnum,$cdom,'provider'); |
if (keys(%courselti)) { |
if (keys(%courselti)) { |
foreach my $item (sort { $a <=> $b } keys(%courselti)) { |
foreach my $item (sort { $a <=> $b } keys(%courselti)) { |
if (($item =~ /^\d+$/) && (ref($courselti{$item}) eq 'HASH')) { |
if (($item =~ /^\d+$/) && (ref($courselti{$item}) eq 'HASH')) { |
Line 5345 sub string_deeplink_selector {
|
Line 5345 sub string_deeplink_selector {
|
} |
} |
my %courselti = |
my %courselti = |
&Apache::lonnet::get_course_lti($env{'course.'.$env{'request.course.id'}.'.num'}, |
&Apache::lonnet::get_course_lti($env{'course.'.$env{'request.course.id'}.'.num'}, |
$env{'course.'.$env{'request.course.id'}.'.domain'}); |
$env{'course.'.$env{'request.course.id'}.'.domain'}, |
|
'provider'); |
foreach my $item (keys(%courselti)) { |
foreach my $item (keys(%courselti)) { |
if (ref($courselti{$item}) eq 'HASH') { |
if (ref($courselti{$item}) eq 'HASH') { |
$crslti{$item} = $courselti{$item}{'name'}; |
$crslti{$item} = $courselti{$item}{'name'}; |