[LON-CAPA-cvs] cvs: loncom /interface loncoursedata.pm

[matthew]

matthew		Wed Aug 27 17:34:24 2003 EDT

  Modified files:              
    /loncom/interface	loncoursedata.pm 
  Log:
  Added 'classification' field to student table in MySQL.  Very preliminary...
  
  
Index: loncom/interface/loncoursedata.pm
diff -u loncom/interface/loncoursedata.pm:1.84 loncom/interface/loncoursedata.pm:1.85
--- loncom/interface/loncoursedata.pm:1.84	Thu Aug 21 17:03:38 2003
+++ loncom/interface/loncoursedata.pm	Wed Aug 27 17:34:24 2003
@@ -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 @@
                     { 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 @@
         $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) {