--- loncom/interface/lonparmset.pm	2001/12/17 14:21:49	1.38
+++ loncom/interface/lonparmset.pm	2001/12/27 17:00:30	1.42
@@ -1,6 +1,30 @@
 # The LearningOnline Network with CAPA
 # Handler to set parameters for assessments
 #
+# $Id: lonparmset.pm,v 1.42 2001/12/27 17:00:30 www Exp $
+#
+# Copyright Michigan State University Board of Trustees
+#
+# This file is part of the LearningOnline Network with CAPA (LON-CAPA).
+#
+# LON-CAPA is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 2 of the License, or
+# (at your option) any later version.
+#
+# LON-CAPA is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with LON-CAPA; if not, write to the Free Software
+# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+#
+# /home/httpd/html/adm/gpl.txt
+#
+# http://www.lon-capa.org/
+#
 # (Handler to resolve ambiguous file locations
 #
 # (TeX Content Handler
@@ -16,6 +40,8 @@
 # 16/01/01,02/08,03/20,03/23,03/24,03/26,05/09,
 # 07/05,07/06,08/08,08/09,09/01,09/21 Gerd Kortemeyer
 # 12/17 Scott Harrison
+# 12/19 Guy Albertelli
+# 12/26,12/27 Gerd Kortemeyer
 #
 ###
 
@@ -498,7 +524,7 @@ ENDHEAD
 	      '" name="url"><input type="hidden" name="command" value="set">');
     }
     foreach ('tolerance','date_default','date_start','date_end',
-             'date_interval','int','float','string'); {
+             'date_interval','int','float','string') {
       $r->print('<input type="hidden" value="'.
           $ENV{'form.recent_'.$_}.'" name="recent_'.$_.'">');
     }
@@ -776,7 +802,12 @@ sub crsenv {
   'comment.email'  => '<b>Feedback Addresses for Comments</b><br>'.
                       '(<tt>user:domain,user:domain,...</tt>)',
   'policy.email'   => '<b>Feedback Addresses for Course Policy</b><br>'.
-                      '(<tt>user:domain,user:domain,...</tt>)'
+                      '(<tt>user:domain,user:domain,...</tt>)',
+  'hideemptyrows'  => '<b>Hide Empty Rows in Spreadsheets</b><br>'.
+                      '("<tt>yes</tt>" for default hiding)',
+ 'pch.roles.denied'=> '<b>Disallow Resource Discussion for Students</b><br>'.
+ '("<tt>st</tt>": student, "<tt>ta</tt>": TA, "<tt>in</tt>": instructor;<br>'.
+ '<tt>role,role,...</tt>)'
  ); 
 
        foreach (split(/\&/,$rep)) {