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

Diff for /loncom/interface/lonmenu.pm between versions 1.550 and 1.557

version 1.550, 2024/05/01 14:42:54 version 1.557, 2024/10/14 02:13:26
Line 1261  s&7&4&docs-22x22.png&Edit Metadata&defau Line 1261  s&7&4&docs-22x22.png&Edit Metadata&defau
 s&7&2&prt.png&Print&printout[_1]&gocstr('/adm/printout','$esc_currdir')&Print contents of directory  s&7&2&prt.png&Print&printout[_1]&gocstr('/adm/printout','$esc_currdir')&Print contents of directory
 s&7&1&del.png&Delete&dir[_3]&gocstr('/adm/cfile?action=delete','$esc_currdir')&Delete this Directory  s&7&1&del.png&Delete&dir[_3]&gocstr('/adm/cfile?action=delete','$esc_currdir')&Delete this Directory
 ENDMENUITEMS  ENDMENUITEMS
                   unless ($crsauthor_cstr) {
                       if (($env{'environment.canarchive'}) &&
                           ($uname eq $env{'user.name'}) && ($udom eq $env{'user.domain'})) {
                           $menuitems .= (<<ENDMENUITEMS);
   s&7&7&archive.png&Export&dir[_1]&gocstr('/adm/cfile?action=archive','$esc_currdir')&Export Authoring Space Archive
   ENDMENUITEMS
                       }
                   }
             } else {              } else {
                 $currdir =~ s|[^/]+$||;                  $currdir =~ s|[^/]+$||;
  my $cleandisfn = &Apache::loncommon::escape_single($thisdisfn);   my $cleandisfn = &Apache::loncommon::escape_single($thisdisfn);
Line 1305  ENDMENUITEMS Line 1313  ENDMENUITEMS
 s&7&2&prt.png&Print&printout[_1]&gocstr('/adm/printout','/priv/$udom/$uname/$cleandisfn')&Prepare a printable document  s&7&2&prt.png&Print&printout[_1]&gocstr('/adm/printout','/priv/$udom/$uname/$cleandisfn')&Prepare a printable document
 ENDMENUITEMS  ENDMENUITEMS
                 }                  }
             }  
 #  #
 # "Exit Daxe" in Functions menu when using Daxe  # "Exit Daxe" in Functions menu when using Daxe
 #  #
Line 1323  s&7&6&tolastloc.png&Exit Daxe&resource[_ Line 1330  s&7&6&tolastloc.png&Exit Daxe&resource[_
 ENDMENUITEMS  ENDMENUITEMS
                     }                      }
                 }                  }
               }
 #  #
 # Editing options usually accessed via "Settings" in inline menu need to be  # Editing options usually accessed via "Settings" in inline menu need to be
 # accessed in a different way, when Authoring Space is accessed in course  # accessed in a different way, when Authoring Space is accessed in course
Line 1896  sub advtools_crumbs { Line 1904  sub advtools_crumbs {
     } elsif ($env{'request.noversionuri'} !~ m{^/adm/(navmaps|viewclasslist)(\?|$)}) {      } elsif ($env{'request.noversionuri'} !~ m{^/adm/(navmaps|viewclasslist)(\?|$)}) {
         if ($env{'request.state'} eq 'construct') {          if ($env{'request.state'} eq 'construct') {
             &Apache::lonhtmlcommon::add_breadcrumb_tool(              &Apache::lonhtmlcommon::add_breadcrumb_tool(
                 'advtools', @funcs[61,73,74,71,72]);                  'advtools', @funcs[61,73,74,71,72,77]);
         } else {          } else {
             &Apache::lonhtmlcommon::add_breadcrumb_tool(              &Apache::lonhtmlcommon::add_breadcrumb_tool(
                 'advtools', @funcs[61,71,72,73,74,75,92]);                  'advtools', @funcs[61,71,72,73,74,75,92]);
Line 2679  sub utilityfunctions { Line 2687  sub utilityfunctions {
     my $esc_url=&escape($currenturl);      my $esc_url=&escape($currenturl);
     my $esc_symb=&escape($currentsymb);      my $esc_symb=&escape($currentsymb);
     my $newname = &mt('New Name');      my $newname = &mt('New Name');
       &js_escape(\$newname);
   
     my $countdown = &countdown_toggle_js();      my $countdown = &countdown_toggle_js();
   
Line 2933  sub serverform { Line 2942  sub serverform {
     if (($env{'request.deeplink.login'}) && ($env{'request.deeplink.target'} eq '_self')) {      if (($env{'request.deeplink.login'}) && ($env{'request.deeplink.target'} eq '_self')) {
         $target = ' target="_self"';          $target = ' target="_self"';
     }      }
       my $submit = &mt('Submit');
     return(<<ENDSERVERFORM);      return(<<ENDSERVERFORM);
 <form name="server" action="/adm/logout" method="post"$target>  <form name="server" action="/adm/logout" method="post"$target aria-hidden="true">
 <input type="hidden" name="postdata" value="none" />  <input type="hidden" name="postdata" value="none" />
 <input type="hidden" name="command" value="none" />  <input type="hidden" name="command" value="none" />
 <input type="hidden" name="url" value="none" />  <input type="hidden" name="url" value="none" />
 <input type="hidden" name="symb" value="none" />  <input type="hidden" name="symb" value="none" />
   <input type="submit" value="$submit" class="LC_visually_hidden" tabindex="-1" disabled="disabled" />
 </form>  </form>
 ENDSERVERFORM  ENDSERVERFORM
 }  }
Line 3103  sub roles_selector { Line 3114  sub roles_selector {
         $js = &jump_to_role($cdom,$cnum,\%seccount,\%courseroles,\%courseprivs,          $js = &jump_to_role($cdom,$cnum,\%seccount,\%courseroles,\%courseprivs,
                             \%roledesc,$privref,$menucoll,$menuref);                              \%roledesc,$privref,$menucoll,$menuref);
         $form =           $form = 
             '<form name="rolechooser" method="post" action="'.$httphost.'/adm/roles"'.$targetattr.'>'."\n".              '<form name="rolechooser" method="post" action="'.$httphost.'/adm/roles"'.$targetattr.' aria-hidden="true">'."\n".
             '  <input type="hidden" name="destinationurl" value="'.              '  <input type="hidden" name="destinationurl" value="'.
             &HTML::Entities::encode($destinationurl).'" />'."\n".              &HTML::Entities::encode($destinationurl).'" />'."\n".
             '  <input type="hidden" name="gotorole" value="1" />'."\n".              '  <input type="hidden" name="gotorole" value="1" />'."\n".
Line 3113  sub roles_selector { Line 3124  sub roles_selector {
             $form .= '  <input type="hidden" name="destsymb" value="'.              $form .= '  <input type="hidden" name="destsymb" value="'.
                         &HTML::Entities::encode($destsymb).'" />'."\n";                          &HTML::Entities::encode($destsymb).'" />'."\n";
         }          }
         $form .= '</form>'."\n";          $form .= '<input type="submit" value="'.&mt('Submit').'" class="LC_visually_hidden" tabindex="-1" disabled="disabled" />'."\n".
                    '</form>'."\n";
         foreach my $role (@roles_order) {          foreach my $role (@roles_order) {
             my $include;              my $include;
             if (defined($courseroles{$role})) {              if (defined($courseroles{$role})) {
Line 3602  $donebutton Line 3614  $donebutton
 <span id="ddcountcollapse" class="LC_menubuttons_inline_text">  <span id="ddcountcollapse" class="LC_menubuttons_inline_text">
 $collapse  $collapse
 </span></a>  </span></a>
 <span id="duedatecountdown" class="LC_menubuttons_inline_text" style="display: $currdisp;"></span>  <span id="duedatecountdown" class="LC_menubuttons_inline_text" style="display: $currdisp;" role="timer"></span>
 <a href="javascript:toggleCountdown();" class="LC_menubuttons_link">  <a href="javascript:toggleCountdown();" class="LC_menubuttons_link">
 <span id="ddcountexpand" class="LC_menubuttons_inline_text" >$expand</span>  <span id="ddcountexpand" class="LC_menubuttons_inline_text" >$expand</span>
 <img src="/res/adm/pages/timer.png" title="$desc" class="LC_icon" alt="$alttxt" /><span class="LC_menubuttons_inline_text">$title</span></a>  <img src="/res/adm/pages/timer.png" title="$desc" class="LC_icon" alt="$alttxt" /><span class="LC_menubuttons_inline_text">$title</span></a>
Removed from v.1.550  
changed lines
  Added in v.1.557

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