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

Diff for /loncom/interface/lonsimplepage.pm between versions 1.64 and 1.66

version 1.64, 2009/01/28 14:45:06 version 1.66, 2009/02/16 10:33:32
Line 139  sub handler { Line 139  sub handler {
 # --------------------------------------- There is such a user, get environment  # --------------------------------------- There is such a user, get environment
   
     if ($target ne 'tex') {      if ($target ne 'tex') {
         my $title = 'Course Page';          my $title = 'Simple Course Page';
         if ($group ne '') {          if ($group ne '') {
             $title = 'Group Page';              $title = 'Simple Group Page';
         }          }
  my $start_page =    my $start_page = 
     &Apache::loncommon::start_page($title,undef,      &Apache::loncommon::start_page($title,undef,
Line 284  sub handler { Line 284  sub handler {
    $syllabus{'uploaded.photourl'});     $syllabus{'uploaded.photourl'});
           
     $image='<img src="'.$syllabus{'uploaded.photourl'}.'"      $image='<img src="'.$syllabus{'uploaded.photourl'}.'"
                             align="right" />';                              />';
     if ($target eq 'tex') {      if ($target eq 'tex') {
  $image=&Apache::lonxml::xmlparse($r,'tex',$image);   $image=&Apache::lonxml::xmlparse($r,'tex',$image);
             }              }
Line 299  sub handler { Line 299  sub handler {
       '</form><form method="post">'.        '</form><form method="post">'.
                       '<input type="hidden" name="forceedit" value="edit" />'.                        '<input type="hidden" name="forceedit" value="edit" />'.
       '<form method="post"><input type="submit" name="delupl" value="'.&mt('Delete Photo').'" />' );        '<form method="post"><input type="submit" name="delupl" value="'.&mt('Delete Photo').'" />' );
  }   }
  &Apache::lontemplate::start_columnSection($r);  
  if($allowed){   if($allowed){
                 $r->print($image.'<div class="clear">&nbsp;</div>');                  $r->print($image.'<div class="clear">&nbsp;</div>');
         }         }
  &Apache::lontemplate::start_ContentBox($r,$allowed);  
  foreach my $field (sort(keys(%syllabusfields))) {   foreach my $field (sort(keys(%syllabusfields))) {
     if (($syllabus{$field}) || ($allowed) ||       if (($syllabus{$field}) || ($allowed) || 
                 ($field eq 'abb_links' && $group ne '')) {                  ($field eq 'abb_links' && $group ne '')) {
Line 349  sub handler { Line 348  sub handler {
  if($allowed){   if($allowed){
  $r->print('<p>');   $r->print('<p>');
  }   }
  &Apache::lontemplate::print_template($r,$syllabusfields{$field},$message,$allowed);   &Apache::lontemplate::print_template($r,$syllabusfields{$field},$message,$allowed,'LC_ContentBoxSpecial');
     } else {      } else {
  my $safeinit;   my $safeinit;
  $r->print(&Apache::lonxml::xmlparse($r,'tex','<h3>'.$syllabusfields{$field}.'</h3>'));   $r->print(&Apache::lonxml::xmlparse($r,'tex','<h3>'.$syllabusfields{$field}.'</h3>'));
Line 367  sub handler { Line 366  sub handler {
  }   }
     }      }
  }   }
  &Apache::lontemplate::end_ContentBox($r);  
  if(!$allowed){   if(!$allowed){
  $r->print($image);   $r->print($image);
  }   }
  &Apache::lontemplate::end_columnSection($r);  
  if ($allowed) {   if ($allowed) {
                 $r->print('<p>'.'<br /><a href="'.$r->uri.'?forcestudent=1'.$refarg.'">'                  $r->print('<p>'.'<br /><a href="'.$r->uri.'?forcestudent=1'.$refarg.'">'
                         .'<font size="+1">'.&mt('Show Student View').'</font></a>'.                          .'<font size="+1">'.&mt('Show Student View').'</font></a>'.
Removed from v.1.64  
changed lines
  Added in v.1.66

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