Diff for /loncom/homework/lonhomework.pm between versions 1.190 and 1.191

version 1.190, 2004/12/22 22:05:40 version 1.191, 2004/12/22 22:08:17
Line 116  sub get_target { Line 116  sub get_target {
     return ('web','answer');      return ('web','answer');
  }   }
     } elsif ( $ENV{'form.problemmode'} eq &mt('Edit') ||      } elsif ( $ENV{'form.problemmode'} eq &mt('Edit') ||
       $ENV{'form.problemmode'} ee 'Edit') {        $ENV{'form.problemmode'} eq 'Edit') {
  if ( $ENV{'form.submitted'} eq 'edit' ) {   if ( $ENV{'form.submitted'} eq 'edit' ) {
     if ( $ENV{'form.submit'} eq &mt('Submit Changes and View') ) {      if ( $ENV{'form.submit'} eq &mt('Submit Changes and View') ) {
  return ('modified','web','answer');   return ('modified','web','answer');
Line 849  sub handler { Line 849  sub handler {
  $ENV{'form.problemmode'}='View';   $ENV{'form.problemmode'}='View';
  &renderpage($request,$file);   &renderpage($request,$file);
     } elsif ($ENV{'form.problemmode'} eq &mt('EditXML') ||      } elsif ($ENV{'form.problemmode'} eq &mt('EditXML') ||
      $ENV{'form.problemmode'} eq 'EditXML' {       $ENV{'form.problemmode'} eq 'EditXML') {
  &editxmlmode($request,$file);   &editxmlmode($request,$file);
     } elsif ($ENV{'form.problemmode'} eq &mt('Calculate answers')) {      } elsif ($ENV{'form.problemmode'} eq &mt('Calculate answers')) {
  &analyze($request,$file);   &analyze($request,$file);

Removed from v.1.190  
changed lines
  Added in v.1.191


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