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

Diff for /loncom/interface/lonmenu.pm between versions 1.394 and 1.397

version 1.394, 2012/11/29 20:05:00 version 1.397, 2012/12/06 21:43:27
Line 501  sub innerregister { Line 501  sub innerregister {
                 }                  }
                 return $trail;                  return $trail;
             }              }
             &Apache::lonhtmlcommon::clear_breadcrumbs();              unless ($env{'request.state'} eq 'construct') {
             &Apache::lonhtmlcommon::add_breadcrumb({text => 'View Resource'});                  &Apache::lonhtmlcommon::clear_breadcrumbs();
                   &Apache::lonhtmlcommon::add_breadcrumb({text => 'View Resource'});
               }
         }          }
     } elsif (! $const_space){      } elsif (! $const_space){
         #a situation when we're looking at a resource outside of context of a           #a situation when we're looking at a resource outside of context of a 
Line 574  sub innerregister { Line 576  sub innerregister {
 #  #
         if (($env{'request.symb'}=~/^uploaded/) && ($perms{'mdc'})) {          if (($env{'request.symb'}=~/^uploaded/) && ($perms{'mdc'})) {
             my $text = 'Edit Folder';              my $text = 'Edit Folder';
             if ($mapurl =~ /\.page$/) {              if (($mapurl =~ /\.page$/) ||
                   ($env{'request.symb'}=~
                        m{uploaded/$cdom/$cnum/default_\d+\.page$}))  {
                 $text = 'Edit Page';                  $text = 'Edit Page';
             }              }
             &switch('','',7,4,'docs-22x22.png',$text,'parms[_2]',              &switch('','',7,4,'docs-22x22.png',$text,'parms[_2]',
Line 911  sub prepare_functions { Line 915  sub prepare_functions {
             (&Apache::lonnet::allowed('mdc',$env{'request.course.id'})) &&              (&Apache::lonnet::allowed('mdc',$env{'request.course.id'})) &&
             (($resurl =~ m{^/adm/wrapper/ext/}) ||              (($resurl =~ m{^/adm/wrapper/ext/}) ||
              ($resurl =~ m{^/uploaded/$cdom/$cnum/supplemental/}) ||               ($resurl =~ m{^/uploaded/$cdom/$cnum/supplemental/}) ||
              ($resurl eq '/adm/supplemental'))) {               ($resurl eq '/adm/supplemental') ||
                ($resurl =~ m{^/public/$cdom/$cnum/syllabus$}) ||
                ($resurl =~ m{^/adm/$match_domain/$match_username/aboutme$}))) {
             my @folders=split('&',$env{'form.folderpath'});              my @folders=split('&',$env{'form.folderpath'});
             if ((@folders > 2) || ($resurl ne '/adm/supplemental')) {              if ((@folders > 2) || ($resurl ne '/adm/supplemental')) {
                 my $esc_path=&escape(&HTML::Entities::encode(&escape($env{'form.folderpath'}),'<>&"'));                  my $esc_path=&escape(&HTML::Entities::encode(&escape($env{'form.folderpath'}),'<>&"'));
Removed from v.1.394  
changed lines
  Added in v.1.397

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