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

Diff for /loncom/interface/lonbulletin.pm between versions 1.42 and 1.45

version 1.42, 2006/10/23 18:48:47 version 1.45, 2008/01/19 15:28:52
Line 237  sub handler { Line 237  sub handler {
          '<h3>'.&mt('Upload a Photo').'</h3>'.           '<h3>'.&mt('Upload a Photo').'</h3>'.
          '<input type="file" name="uploaddoc" size="50">'.           '<input type="file" name="uploaddoc" size="50">'.
          '<input type="submit" name="storeupl" value="'.&mt('Upload').'">'.           '<input type="submit" name="storeupl" value="'.&mt('Upload').'">'.
  '</form><form method="post">');   '</form><form method="post">'.
            '<input type="hidden" name="forceedit" value="edit" />');
        }         }
        foreach my $field (sort(keys(%syllabusfields))) {         foreach my $field (sort(keys(%syllabusfields))) {
           if (($syllabus{$field}) || ($allowed)) {            if (($syllabus{$field}) || ($allowed)) {
Line 266  sub handler { Line 267  sub handler {
                  if ($allowed) {                   if ($allowed) {
                 $r->print('<br /><textarea cols="80" rows="10" name="'.$field.'">'.                  $r->print('<br /><textarea cols="80" rows="10" name="'.$field.'">'.
   &HTML::Entities::encode($syllabus{$field},'&"<>').    &HTML::Entities::encode($syllabus{$field},'&"<>').
            '</textarea><input type="submit" name="storesyl" value="'.&mt('Store').'" />');             '</textarea><input type="submit" name="storesyl" value="'.&mt('Save').'" />');
         }          }
     } else {      } else {
                 if ($target ne 'tex') {                  if ($target ne 'tex') {
Line 278  sub handler { Line 279  sub handler {
                  $r->print(                   $r->print(
                 '<br />'.&mt('Topic').'<br /><textarea cols="80" rows="2" name="'.$field.'">'.                  '<br />'.&mt('Topic').'<br /><textarea cols="80" rows="2" name="'.$field.'">'.
   &HTML::Entities::encode($syllabus{$field},'&"<>').    &HTML::Entities::encode($syllabus{$field},'&"<>').
            '</textarea><input type="submit" name="storesyl" value="'.&mt('Store').'" />');             '</textarea><input type="submit" name="storesyl" value="'.&mt('Save').'" />');
                 }                  }
             }              }
   }    }
Removed from v.1.42  
changed lines
  Added in v.1.45

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