--- loncom/homework/response.pm 2006/06/24 01:31:34 1.141 +++ loncom/homework/response.pm 2006/06/28 21:12:50 1.142 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # various response type definitons response definition # -# $Id: response.pm,v 1.141 2006/06/24 01:31:34 albertel Exp $ +# $Id: response.pm,v 1.142 2006/06/28 21:12:50 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -131,8 +131,10 @@ sub setrandomnumber { $id1=&Apache::bridgetask::get_dim_id(); if (!$ignore_id2 && ref($Apache::bridgetask::instance{$id1})) { $id2=$Apache::bridgetask::instance{$id1}[-1]; + $shift_amt=scalar(@{$Apache::bridgetask::instance{$id1}}); + } else { + $shift_amt=0; } - $shift_amt=scalar(@{$Apache::bridgetask::instance{$id1}}); } &Apache::lonxml::debug("id1: $id1, id2: $id2, shift_amt: $shift_amt"); if (!$rand_alg || $rand_alg eq '32bit' || $rand_alg eq '64bit' ||