[LON-CAPA-cvs] cvs: loncom /homework grades.pm

[albertel]

albertel		Mon Feb 16 13:28:25 2004 EDT

  Modified files:              
    /loncom/homework	grades.pm 
  Log:
  - err, nohist this.
  
  
Index: loncom/homework/grades.pm
diff -u loncom/homework/grades.pm:1.174 loncom/homework/grades.pm:1.175
--- loncom/homework/grades.pm:1.174	Mon Feb  9 17:37:54 2004
+++ loncom/homework/grades.pm	Mon Feb 16 13:28:25 2004
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # The LON-CAPA Grading handler
 #
-# $Id: grades.pm,v 1.174 2004/02/09 22:37:54 albertel Exp $
+# $Id: grades.pm,v 1.175 2004/02/16 18:28:25 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -3843,7 +3843,7 @@
     } else {
 	$scanlines{'skipped'}=[(split("\n",$lines,-1))];
     }
-    my @tmp=&Apache::lonnet::dump('scantrondata',$cdom,$cname);
+    my @tmp=&Apache::lonnet::dump('nohist_scantrondata',$cdom,$cname);
     if ($tmp[0] =~ /^(error:|no_such_host)/) { @tmp=(); }
     my %scan_data = @tmp;
     return (\%scanlines,\%scan_data);
@@ -3875,7 +3875,7 @@
     &lonnet_putfile(join("\n",@{$scanlines->{'skipped'}}),
 		    $prefix.'skipped_'.
 		    $ENV{'form.scantron_selectfile'});
-    &Apache::lonnet::put('scantrondata',$scan_data,$cdom,$cname);
+    &Apache::lonnet::put('nohist_scantrondata',$scan_data,$cdom,$cname);
 }
 
 sub scantron_get_line {