--- loncom/interface/lonparmset.pm	2006/06/02 10:02:37	1.310
+++ loncom/interface/lonparmset.pm	2006/06/02 22:12:50	1.311
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Handler to set parameters for assessments
 #
-# $Id: lonparmset.pm,v 1.310 2006/06/02 10:02:37 www Exp $
+# $Id: lonparmset.pm,v 1.311 2006/06/02 22:12:50 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -3365,13 +3365,25 @@ sub parm_change_log {
     my %parmlog=&Apache::lonnet::dump('nohist_parameterlog',
 				      $env{'course.'.$env{'request.course.id'}.'.domain'},
 				      $env{'course.'.$env{'request.course.id'}.'.num'});
+
     if ((keys(%parmlog))[0]=~/^error\:/) { undef(%parmlog); }
-    $r->print('<form method="post"><input type="hidden" name="action" value="parameterchangelog" />');
-    unless ($env{'form.show'}) { $env{'form.show'}=10; }
-    my $countselect = &Apache::lonmeta::selectbox('show',
-                                                  $env{'form.show'},
-                                                  undef,
-                                                  (10,20,50,100,1000,10000,100000));
+
+    $r->print('<form action="/adm/parmset?action=settable"
+                     method="post" name"parameterlog">
+               <input type="hidden" name="action"
+                      value="parameterchangelog" />');
+    
+    my %saveable_parameters = ('show' => 'scalar',);
+    &Apache::loncommon::store_course_settings('parameter_log',
+                                              \%saveable_parameters);
+    &Apache::loncommon::restore_course_settings('parameter_log',
+                                                \%saveable_parameters);
+    if (!$env{'form.show'}) { $env{'form.show'}=10; }
+
+    my $countselect =
+	&Apache::lonmeta::selectbox('show',$env{'form.show'},undef,
+				    (&mt('all'),10,20,50,100,1000,10000));
+
     $r->print('<nobr>'.&mt('[_1] Records',$countselect).'</nobr>'.
 	      '<input type="submit" value="'.&mt('Display').'" />');
 
@@ -3460,7 +3472,8 @@ sub parm_change_log {
 	    $r->print(&Apache::loncommon::end_data_table_row());
 	}
 	$shown++;
-	if ($shown>=$env{'form.show'}) { last; }
+	if (!($env{'form.show'} eq &mt('all') 
+	      || $shown<=$env{'form.show'})) { last; }
     }
     $r->print(&Apache::loncommon::end_data_table());
     $r->print('</form>');