Diff for /loncom/homework/caparesponse/caparesponse.pm between versions 1.197 and 1.198

version 1.197, 2006/12/04 20:35:06 version 1.198, 2006/12/04 23:56:20
Line 324  sub check_submission { Line 324  sub check_submission {
     }      }
           
     if ($tag eq 'formularesponse') {      if ($tag eq 'formularesponse') {
  if ($$args_ref{'samples'}) {  # if ($$args_ref{'samples'}) {
     $$args_ref{'type'}='fml';      $$args_ref{'type'}='fml';
  } else {  # } else {
     $$args_ref{'type'}='math';  #    $$args_ref{'type'}='math';
  }  # }
     } elsif ($tag eq 'numericalresponse') {      } elsif ($tag eq 'numericalresponse') {
  $$args_ref{'type'}='float';   $$args_ref{'type'}='float';
     }      }

Removed from v.1.197  
changed lines
  Added in v.1.198


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