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

Diff for /loncom/interface/londocs.pm between versions 1.693 and 1.698

version 1.693, 2023/01/19 16:43:49 version 1.698, 2023/03/27 18:41:04
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') {
Line 4298  END Line 4300  END
                     $nomodal = 1;                      $nomodal = 1;
                 }                  }
             }              }
             my ($checkencrypt,$shownurl);              my $checkencrypt;
             if (!$env{'request.role.adv'}) {              if (!$env{'request.role.adv'}) {
                 if (((&LONCAPA::map::getparameter($orderidx,'parameter_encrypturl'))[0]=~/^yes$/i) ||                  if (((&LONCAPA::map::getparameter($orderidx,'parameter_encrypturl'))[0]=~/^yes$/i) ||
                     ($isencrypted) || (&Apache::lonnet::EXT('resource.0.encrypturl',$symb) =~ /^yes$/i)) {                      ($isencrypted) || (&Apache::lonnet::EXT('resource.0.encrypturl',$symb) =~ /^yes$/i)) {
Line 4318  END Line 4320  END
                 my $currenc = $env{'request.enc'};                  my $currenc = $env{'request.enc'};
                 $env{'request.enc'} = 1;                  $env{'request.enc'} = 1;
                 $shownsymb = &Apache::lonenc::encrypted($symb);                  $shownsymb = &Apache::lonenc::encrypted($symb);
                 $shownurl = &Apache::lonenc::encrypted($url);                  my $shownurl = &Apache::lonenc::encrypted($url);
                 if (&Apache::lonnet::symbverify($symb,$url)) {                  if (&Apache::lonnet::symbverify($symb,$url)) {
                     $url = $shownurl;                      $url = $shownurl;
                 } else {                  } else {
Line 4333  END Line 4335  END
                         $url = &Apache::lonnet::clutter($url);                          $url = &Apache::lonnet::clutter($url);
                     }                      }
                 }                  }
                 $shownurl = $url;              } else {
                   $url = '';
             }              }
             unless ($env{'request.role.adv'}) {              unless ($env{'request.role.adv'}) {
                 if ((&LONCAPA::map::getparameter($orderidx,'parameter_hiddenresource'))[0]=~/^yes$/i) {                  if ((&LONCAPA::map::getparameter($orderidx,'parameter_hiddenresource'))[0]=~/^yes$/i) {
Line 4344  END Line 4347  END
                     $hiddenres = 1;                      $hiddenres = 1;
                 }                  }
             }              }
             if ($url ne '') {              if (($url ne '') && ($shownsymb ne '')) {
                 $url = $shownurl.(($shownurl=~/\?/)?'&':'?').'symb='.&escape($shownsymb);                  $url .= (($url=~/\?/)?'&':'?').'symb='.&escape($shownsymb);
             }              }
  }   }
     } elsif ($supplementalflag) {      } elsif ($supplementalflag) {
Line 4650  $form_end; Line 4653  $form_end;
         my ($enctext,$hidtext,$formhidden,$formurlhidden);          my ($enctext,$hidtext,$formhidden,$formurlhidden);
         if ((&LONCAPA::map::getparameter($orderidx,'parameter_hiddenresource'))[0]=~/^yes$/i) {          if ((&LONCAPA::map::getparameter($orderidx,'parameter_hiddenresource'))[0]=~/^yes$/i) {
             $hidtext = ' checked="checked"';              $hidtext = ' checked="checked"';
             if (($ishash) && (ref($filtersref->{'randomorder'}) eq 'ARRAY')) {              if (($ishash) && (ref($filtersref->{'hiddenresource'}) eq 'ARRAY')) {
                 push(@{$filtersref->{'hiddenresource'}},$orderidx);                  push(@{$filtersref->{'hiddenresource'}},$orderidx);
             }              }
         }          }
Line 6160  sub handler { Line 6163  sub handler {
                 'dire' => 'Directory:',                  'dire' => 'Directory:',
                 'cate' => 'Category:',                  'cate' => 'Category:',
                 'tmpl' => 'Template:',                  'tmpl' => 'Template:',
                   'empd' => 'No resources found',
                 'comment' => 'Comment',                  'comment' => 'Comment',
                 'parse' => 'Upload embedded images/multimedia files if HTML file',                  'parse' => 'Upload embedded images/multimedia files if HTML file',
                 'bb5'      => 'Blackboard 5',                  'bb5'      => 'Blackboard 5',
Line 6308  SEDFFORM Line 6312  SEDFFORM
         <form action="/adm/coursedocs" method="post" name="crsresimportform" onsubmit="return validImportCrsRes();">          <form action="/adm/coursedocs" method="post" name="crsresimportform" onsubmit="return validImportCrsRes();">
         <fieldset id="importcrsresform" style="display: none;">          <fieldset id="importcrsresform" style="display: none;">
         <legend>$lt{'imcr'}</legend>          <legend>$lt{'imcr'}</legend>
           <div id="importcrsrescontent" style="display: none;">
         <input type="hidden" name="active" value="bb" />          <input type="hidden" name="active" value="bb" />
         $pickfile          $pickfile
         <p>          <p>
Line 6315  SEDFFORM Line 6320  SEDFFORM
         </p>          </p>
         <input type="hidden" name="importdetail" value="" />          <input type="hidden" name="importdetail" value="" />
         <input type="submit" name="crsres" value="$lt{'impo'}" $disabled /><br />          <input type="submit" name="crsres" value="$lt{'impo'}" $disabled /><br />
           </div>
           <div id="importcrsresempty" style="display: none;">
           <p>
           $lt{'empd'}
           </p>
           </div>
         </fieldset>          </fieldset>
         </form>          </form>
 CRSFORM  CRSFORM
Line 7960  function toggleImportCrsres(caller) { Line 7971  function toggleImportCrsres(caller) {
             var curr = document.getElementById('importcrsresform').style.display;              var curr = document.getElementById('importcrsresform').style.display;
             if (curr == 'none') {              if (curr == 'none') {
                 disp='block';                  disp='block';
                 populateCrsSelects(document.crsresimportform,'coursepath','coursefile',1,'',1,0,1,1);                  populateCrsSelects(document.crsresimportform,'coursepath','coursefile',1,'',1,0,1,1,0);
                   if ((document.getElementById('importcrsrescontent')) &&
                       (document.getElementById('importcrsresempty'))) {
                       var selelem = document.crsresimportform.elements['coursepath'];
                       var numdirs = 0;
                       if (selelem.options.length) {
                           numdirs = selelem.options.length - 1;
                       }
                       if (numdirs) {
                           document.getElementById('importcrsrescontent').style.display='block';
                           document.getElementById('importcrsresempty').style.display='none';
                       } else {
                           document.getElementById('importcrsrescontent').style.display='none';
                           document.getElementById('importcrsresempty').style.display='block';
                       }
                   }
             }              }
         }          }
         document.getElementById('importcrsresform').style.display=disp;          document.getElementById('importcrsresform').style.display=disp;
Line 8024  function populateDirSelects(form,locsel, Line 8050  function populateDirSelects(form,locsel,
             }              }
             var http = new XMLHttpRequest();              var http = new XMLHttpRequest();
             var url = "/adm/courseauthor";              var url = "/adm/courseauthor";
             var params = "role="+role+"&rec="+recurse+"&nonempty="+nonemptydir;              var params = "role="+role+"&rec="+recurse+"&nonempty="+nonemptydir+"&addtop=1";
             http.open("POST", url, true);              http.open("POST", url, true);
             http.setRequestHeader("Content-type", "application/x-www-form-urlencoded");              http.setRequestHeader("Content-type", "application/x-www-form-urlencoded");
             http.onreadystatechange = function() {              http.onreadystatechange = function() {
Line 8043  function populateDirSelects(form,locsel, Line 8069  function populateDirSelects(form,locsel,
                                 selelem.options[selelem.options.length] = new Option(data.dirs[j],data.dirs[j]);                                  selelem.options[selelem.options.length] = new Option(data.dirs[j],data.dirs[j]);
                             }                              }
                             selelem.selectedIndex = 0;                              selelem.selectedIndex = 0;
                               if (len == 1) {
                                   toggleCrsResTitle();
                               }
                         }                          }
                     }                      }
                 }                  }
Removed from v.1.693  
changed lines
  Added in v.1.698

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