--- loncom/interface/statistics/lonstathelpers.pm	2011/03/12 02:58:49	1.65
+++ loncom/interface/statistics/lonstathelpers.pm	2011/12/21 21:25:51	1.68
@@ -1,6 +1,6 @@
 # The LearningOnline Network with CAPA
 #
-# $Id: lonstathelpers.pm,v 1.65 2011/03/12 02:58:49 www Exp $
+# $Id: lonstathelpers.pm,v 1.68 2011/12/21 21:25:51 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -145,9 +145,9 @@ sub problem_selector {
     if ($onclick) {
         $jsadd="onClick='$onclick'";
     }
-    $Str =  &Apache::loncommon::start_scrollbox(($smallbox?'520px':'620px'),
-                                                ($smallbox?'500px':'600px'),
-                                                ($smallbox?'50px':'300px')).
+    $Str =  &Apache::loncommon::start_scrollbox(($smallbox?'420px':'620px'),
+                                                ($smallbox?'400px':'600px'),
+                                                ($smallbox?'60px':'300px')).
             &Apache::loncommon::start_data_table();
     my $rb_count =0;
     my ($navmap,@sequences) = 
@@ -716,10 +716,7 @@ sub GetStudentAnswers {
     # Read in the cache (if it exists) before we start timing things.
     &Apache::lonstathelpers::ensure_proper_cache($resource->{'symb'});
     # Open progress window
-    my %prog_state=&Apache::lonhtmlcommon::Create_PrgWin
-        ($r,'Student Answer Compilation Status',
-         'Student Answer Compilation Progress', scalar(@$Students),
-         $status_type,undef,$formname,$inputname);
+    my %prog_state=&Apache::lonhtmlcommon::Create_PrgWin($r,scalar(@$Students));
     $r->rflush();
     foreach my $student (@$Students) {
         last if ($c->aborted());
@@ -1004,7 +1001,7 @@ prior to every analysis lookup.
 sub ensure_proper_cache {
     my ($symb) = @_;
     my $cid = $env{'request.course.id'};
-    my $new_filename =  '/home/httpd/perl/tmp/'.
+    my $new_filename = LONCAPA::tempdir() .
         'problemanalysis_'.$cid.'_analysis_cache.db';
     if (! defined($cache_filename) ||
         $cache_filename ne $new_filename ||
@@ -1492,10 +1489,7 @@ sub gather_full_student_data {
     my @Students = @Apache::lonstatistics::Students;
     #
     # Open the progress window
-    my %prog_state=&Apache::lonhtmlcommon::Create_PrgWin
-        ($r,&mt('Student Data Compilation Status'),
-         &mt('Student Data Compilation Progress'), scalar(@Students),
-         $status_type,undef,$formname,$inputname);
+    my %prog_state=&Apache::lonhtmlcommon::Create_PrgWin($r,scalar(@Students));
     #
     while (my $student = shift @Students) {
         return if ($c->aborted());