version 1.694, 2023/01/20 16:19:56
|
version 1.695, 2023/03/11 21:58:18
|
Line 1210 sub docs_change_log {
|
Line 1210 sub docs_change_log {
|
my ($title,$url) = split(/\:/,$docslog{$id}{'logentry'}{'parameter_res'},3); |
my ($title,$url) = split(/\:/,$docslog{$id}{'logentry'}{'parameter_res'},3); |
if ($title eq '') { |
if ($title eq '') { |
($title) = ($url =~ m{/([^/]+)$}); |
($title) = ($url =~ m{/([^/]+)$}); |
|
} elsif ($is_supp) { |
|
$title = &Apache::loncommon::parse_supplemental_title($title); |
} |
} |
$r->print(&LONCAPA::map::qtescape($title).':<ul>'); |
$r->print(&LONCAPA::map::qtescape($title).':<ul>'); |
foreach my $parameter ('randompick','hiddenresource','encrypturl','randomorder','gradable') { |
foreach my $parameter ('randompick','hiddenresource','encrypturl','randomorder','gradable') { |