[BACK]Return to londocs.pm CVS log [TXT] [DIR] Up to [LON-CAPA] / loncom / interface

Diff for /loncom/interface/londocs.pm between versions 1.687 and 1.688

version 1.687, 2022/10/29 14:47:00 version 1.688, 2022/10/29 18:13:28
Line 205  sub validate_supppath { Line 205  sub validate_supppath {
                     $backto .= '&'.$items[$i];                      $backto .= '&'.$items[$i];
                     my $is_hidden;                      my $is_hidden;
                     unless ($got_supp) {                      unless ($got_supp) {
                         my ($supplemental) = &Apache::lonnet::get_supplemental($coursenum,$coursedom);                          my ($supplemental) = &Apache::loncommon::get_supplemental($coursenum,$coursedom);
                         if (ref($supplemental) eq 'HASH') {                          if (ref($supplemental) eq 'HASH') {
                             if (ref($supplemental->{'hidden'}) eq 'HASH') {                              if (ref($supplemental->{'hidden'}) eq 'HASH') {
                                 %supphidden = %{$supplemental->{'hidden'}};                                  %supphidden = %{$supplemental->{'hidden'}};
Line 3562  sub editor { Line 3562  sub editor {
     }      }
   
     if ((!$allowed) && ($folder =~ /^supplemental_\d+$/)) {      if ((!$allowed) && ($folder =~ /^supplemental_\d+$/)) {
         my ($supplemental) = &Apache::lonnet::get_supplemental($coursenum,$coursedom);          my ($supplemental) = &Apache::loncommon::get_supplemental($coursenum,$coursedom);
         if (ref($supplemental) eq 'HASH') {          if (ref($supplemental) eq 'HASH') {
             if ((ref($supplemental->{'hidden'}) eq 'HASH') &&              if ((ref($supplemental->{'hidden'}) eq 'HASH') &&
                 (ref($supplemental->{'ids'}) eq 'HASH')) {                  (ref($supplemental->{'ids'}) eq 'HASH')) {
Line 5802  sub handler { Line 5802  sub handler {
             if ($supplementalflag) {              if ($supplementalflag) {
                 ($foldername,$hiddenfolder) = ($pathitems[-1] =~ /^([^:]*)::(|1):::$/);                  ($foldername,$hiddenfolder) = ($pathitems[-1] =~ /^([^:]*)::(|1):::$/);
                 $foldername = &HTML::Entities::decode(&unescape($foldername));                  $foldername = &HTML::Entities::decode(&unescape($foldername));
                 my ($supplemental) = &Apache::lonnet::get_supplemental($coursenum,$coursedom);                  my ($supplemental) = &Apache::loncommon::get_supplemental($coursenum,$coursedom);
                 if (ref($supplemental) eq 'HASH') {                  if (ref($supplemental) eq 'HASH') {
                     my ($suppmap,$suppmapnum);                      my ($suppmap,$suppmapnum);
                     if ($folder eq 'supplemental') {                      if ($folder eq 'supplemental') {
Removed from v.1.687  
changed lines
  Added in v.1.688

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>