Diff for /loncom/homework/default_homework.lcpm between versions 1.145 and 1.146

version 1.145, 2009/06/23 03:01:15 version 1.146, 2009/12/27 19:40:42
Line 326  sub caparesponse_check_list { Line 326  sub caparesponse_check_list {
               $element =~ s/\s//g;                $element =~ s/\s//g;
           }            }
           my $appendunit=$unit;            my $appendunit=$unit;
           if (($unit=~/\%/) && ($answerunit ne '%'))  {  #          if (($unit=~/\%/) && ($answerunit ne '%'))  {
              $element=$element/100;  #             $element=$element/100;
              $appendunit=~s/\%//;  #             $appendunit=~s/\%//;
           }      #          }    
           if (($element==0) && ($unit!~/\w/) && ($answerunit=~/\w/)) {            if (($element==0) && ($unit!~/\w/) && ($answerunit=~/\w/)) {
              $appendunit=$answerunit;               $appendunit=$answerunit;
           }            }

Removed from v.1.145  
changed lines
  Added in v.1.146


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