--- loncom/interface/loncoursedata.pm 2003/08/21 21:03:38 1.84 +++ loncom/interface/loncoursedata.pm 2003/08/27 21:34:24 1.85 @@ -1,6 +1,6 @@ # The LearningOnline Network with CAPA # -# $Id: loncoursedata.pm,v 1.84 2003/08/21 21:03:38 matthew Exp $ +# $Id: loncoursedata.pm,v 1.85 2003/08/27 21:34:24 matthew Exp $ # # Copyright Michigan State University Board of Trustees # @@ -526,6 +526,8 @@ sub init_dbs { { name => 'student', type => 'VARCHAR(100)', restrictions => 'NOT NULL'}, + { name => 'classification', + type => 'varchar(100)', }, ], 'PRIMARY KEY' => ['student (100)'], 'KEY' => [{ columns => ['student_id']},], @@ -843,7 +845,7 @@ sub get_student_id { $have_read_student_table = 1; } if (! exists($ids_by_student{$student})) { - &Apache::lonmysql::store_row($student_table,[undef,$student]); + &Apache::lonmysql::store_row($student_table,[undef,$student,undef]); undef(%ids_by_student); my @Result = &Apache::lonmysql::get_rows($student_table); foreach (@Result) {