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

Diff for /loncom/interface/lonmenu.pm between versions 1.369.2.28 and 1.369.2.29

version 1.369.2.28, 2012/12/14 14:21:55 version 1.369.2.29, 2012/12/22 15:08:10
Line 577  sub innerregister { Line 577  sub innerregister {
                 }                  }
                 my $trail;                  my $trail;
                 if ($env{'form.folderpath'}) {                  if ($env{'form.folderpath'}) {
                     my $editbutton =                      &prepare_functions($resurl,$forcereg,$group,undef,undef,1);
                         &prepare_functions($resurl,$forcereg,$group,undef,undef,1);  
                     ($trail) =                      ($trail) =
                         &Apache::lonhtmlcommon::docs_breadcrumbs(undef,$crstype,undef,$title,1);                          &Apache::lonhtmlcommon::docs_breadcrumbs(undef,$crstype,undef,$title,1);
                 } else {                  } else {
Line 625  sub innerregister { Line 624  sub innerregister {
             $editbutton = &prepare_functions($resurl,$forcereg,$group);              $editbutton = &prepare_functions($resurl,$forcereg,$group);
         }          }
         if ($editbutton eq '') {          if ($editbutton eq '') {
             &clear(6,1);              $editbutton = &clear(6,1);
         }          }
   
 #  #
Line 1287  sub prepare_functions { Line 1286  sub prepare_functions {
                                               $forceedit,$forceview,$forcereg,                                                $forceedit,$forceview,$forcereg,
                                               $env{'form.title'},$env{'form.suppurl'});                                                $env{'form.title'},$env{'form.suppurl'});
             }              }
         } elsif ($resurl !~ m{^adm/($match_domain)/($match_username)/aboutme$}) {          } elsif ($resurl !~ m{^/?adm/($match_domain)/($match_username)/aboutme$}) {
             if ($env{'request.filename'}) {              if ($env{'request.filename'}) {
                 my $file=&Apache::lonnet::declutter($env{'request.filename'});                  my $file=&Apache::lonnet::declutter($env{'request.filename'});
                 ($cfile,$home,$switchserver,$forceedit,$forceview) =                  ($cfile,$home,$switchserver,$forceedit,$forceview) =
Line 1304  sub prepare_functions { Line 1303  sub prepare_functions {
   
     if ($env{'request.course.id'}) {      if ($env{'request.course.id'}) {
 # This applies to about me page for users in a course  # This applies to about me page for users in a course
         if ($resurl =~ m{^adm/($match_domain)/($match_username)/aboutme$}) {          if ($resurl =~ m{^/?adm/($match_domain)/($match_username)/aboutme$}) {
             my ($sdom,$sname) = ($1,$2);              my ($sdom,$sname) = ($1,$2);
             unless (&Apache::lonnet::is_course($sdom,$sname)) {              unless (&Apache::lonnet::is_course($sdom,$sname)) {
                 &switch('','',6,4,'mail-message-new-22x22.png','Message to user',                  &switch('','',6,4,'mail-message-new-22x22.png','Message to user',
Removed from v.1.369.2.28  
changed lines
  Added in v.1.369.2.29

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