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

Diff for /loncom/interface/loncreateuser.pm between versions 1.477 and 1.478

version 1.477, 2024/05/01 15:18:58 version 1.478, 2024/05/01 21:22:09
Line 245  function toggleCustom(form,item,name) { Line 245  function toggleCustom(form,item,name) {
         if (radioname) {          if (radioname) {
             if (radioname.length > 0) {              if (radioname.length > 0) {
                 var setvis;                  var setvis;
                 var RegExp = /^customtext_(aboutme|blog|portfolio|portaccess|timezone|webdav)\$/;                  var RegExp = /^customtext_(aboutme|blog|portfolio|portaccess|timezone|webdav|archive)\$/;
                 for (var i=0; i<radioname.length; i++) {                  for (var i=0; i<radioname.length; i++) {
                     if (radioname[i].checked == true) {                      if (radioname[i].checked == true) {
                         if (radioname[i].value == 1) {                          if (radioname[i].value == 1) {
Line 362  sub build_tools_display { Line 362  sub build_tools_display {
                 if ($userenv{'author'.$item} ne '') {                  if ($userenv{'author'.$item} ne '') {
                     $cust_on = ' checked="checked" ';                      $cust_on = ' checked="checked" ';
                     $cust_off = '';                      $cust_off = '';
                       if ($item eq 'archive') {
                           $curr_access = $userenv{'author'.$item};
                       }
                   } elsif ($item eq 'archive') {
                       $curr_access = 0;
                       if (ref($domconfig{'authordefaults'}) eq 'HASH') {
                           $curr_access = $domconfig{'authordefaults'}{'archive'};
                       }
                 }                  }
             } elsif ($item eq 'webdav') {              } elsif ($item eq 'webdav') {
                 if ($userenv{'tools.'.$item} ne '') {                  if ($userenv{'tools.'.$item} ne '') {
Line 458  sub build_tools_display { Line 466  sub build_tools_display {
             my $current = $userenv{$context.'.'.$item};              my $current = $userenv{$context.'.'.$item};
             if ($item eq 'webdav') {              if ($item eq 'webdav') {
                 $current = $userenv{'tools.webdav'};                  $current = $userenv{'tools.webdav'};
               } elsif ($item eq 'archive') {
                   $current = $userenv{'author'.$item};
             }              }
             if ($current eq '') {              if ($current eq '') {
                 $custom_access =                  $custom_access =
Line 1524  sub print_user_modification_page { Line 1534  sub print_user_modification_page {
             unless ($isauthor) {              unless ($isauthor) {
                 push(@toggles,'requestauthor');                  push(@toggles,'requestauthor');
             }              }
             push(@toggles,('webdav','editors'));              push(@toggles,('webdav','editors','archive'));
         }          }
         if (&Apache::lonnet::allowed('mut',$ccdomain)) {          if (&Apache::lonnet::allowed('mut',$ccdomain)) {
             push(@toggles,('aboutme','blog','portfolio','portaccess','timezone'));              push(@toggles,('aboutme','blog','portfolio','portaccess','timezone'));
Removed from v.1.477  
changed lines
  Added in v.1.478

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