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

Diff for /loncom/homework/structuretags.pm between versions 1.444.4.2 and 1.444.4.4

version 1.444.4.2, 2009/08/14 12:32:04 version 1.444.4.4, 2010/01/29 15:33:02
Line 1106  sub end_problem { Line 1106  sub end_problem {
  '\textit{'.$duedate_text.'} '.$toc_line;   '\textit{'.$duedate_text.'} '.$toc_line;
  } else {   } else {
     $frontmatter.= $begin_doc.$toc_line;      $frontmatter.= $begin_doc.$toc_line;
     if ($Apache::lonhomework::type eq 'exam' and $allow_print_points==1) { $frontmatter .= '\fbox{\textit{'.$weight.' pt}}';}                      if ($Apache::lonhomework::type eq 'exam' and $allow_print_points==1) {
                           $frontmatter .= '\fbox{\textit{'.$weight.' pt}}';
                       }
  }   }
     } else {      } else {
  $frontmatter .= '\vskip 1mm\textit{'.$duedate_text.'} \\\\\\\\'.$startminipage;   $frontmatter .= '\vskip 1mm\textit{'.$duedate_text.'} \\\\\\\\'.$startminipage;
Line 1114  sub end_problem { Line 1116  sub end_problem {
  } else {   } else {
     if (not $env{'request.symb'} =~ m/\.page_/) {      if (not $env{'request.symb'} =~ m/\.page_/) {
  $frontmatter .= $begin_doc.$toc_line;   $frontmatter .= $begin_doc.$toc_line;
  if (($Apache::lonhomework::type eq 'exam') and ($allow_print_points==1)) { $frontmatter .= '\fbox{\textit{'.$weight.' pt}}';}                  if (($Apache::lonhomework::type eq 'exam') and ($allow_print_points==1)) {
                       $frontmatter .= '\fbox{\textit{'.$weight.' pt}}';
                   }
     } else {      } else {
  $frontmatter .= '\vskip 1mm \\\\\\\\'.$startminipage;   $frontmatter .= '\vskip 1mm \\\\\\\\'.$startminipage;
     }      }
Line 1756  sub start_part { Line 1760  sub start_part {
     '.disableexampointprint'}) eq 'yes') {      '.disableexampointprint'}) eq 'yes') {
  $allow_print_points=0;   $allow_print_points=0;
     }      }
     if (($Apache::lonhomework::type eq 'exam') && ($allow_print_points)) { $result .= '\fbox{\textit{'.$weight.' pt}}';}                      if (($Apache::lonhomework::type eq 'exam') && ($allow_print_points)) { 
                           $result .= '\vskip 10mm\fbox{\textit{'.$weight.' pt}}';
                       }
  } elsif ($target eq 'web') {   } elsif ($target eq 'web') {
     $result.='<a name="'.&escape($Apache::inputtags::part).'" />';      $result.='<a name="'.&escape($Apache::inputtags::part).'" />';
  }   }
Line 2043  sub start_simpleeditbutton { Line 2049  sub start_simpleeditbutton {
 #              .&mt('Note: it can take up to 10 minutes for changes to take effect for all users.')  #              .&mt('Note: it can take up to 10 minutes for changes to take effect for all users.')
 #              .&Apache::loncommon::help_open_topic('Caching')  #              .&Apache::loncommon::help_open_topic('Caching')
 #              .'</p>';  #              .'</p>';
         $result.=&Apache::lontemplate::start_functionslist()          $result .= '<table width="100%" bgcolor="#FFFFAA" border="2"><tr><td>'.
                 .&Apache::lontemplate::item_functionslist(                     '<a href="'.$url.'/smpedit?symb='.&escape($symb).'">'.
                      '<a href="'.$url.'/smpedit?symb='.&escape($symb).'">'.&mt('Edit').'</a>')                     &mt('Edit').'</a>.'</td></tr></table><br />';
                 .&Apache::lontemplate::end_functionslist();  
   
     }      }
     return $result;      return $result;
Removed from v.1.444.4.2  
changed lines
  Added in v.1.444.4.4

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