version 1.484.2.93.2.10, 2023/01/20 16:55:44
|
version 1.484.2.93.2.11, 2023/03/12 02:22:09
|
Line 1161 sub docs_change_log {
|
Line 1161 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') { |
foreach my $parameter ('randompick','hiddenresource','encrypturl','randomorder') { |