Index: openacs-4/packages/acs-subsite/www/admin/site-map/parameter-set.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/admin/site-map/Attic/parameter-set.tcl,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/acs-subsite/www/admin/site-map/parameter-set.tcl	10 Sep 2002 22:22:11 -0000	1.6
+++ openacs-4/packages/acs-subsite/www/admin/site-map/parameter-set.tcl	31 Mar 2003 14:45:26 -0000	1.7
@@ -39,10 +39,14 @@
 # DRB: This should be rewritten to optionally allow for the definition of possible parameter values,
 # with a drop-down select widget used rather than a text input widget. 
 
+# TIL: only show the from-file-parameter-warning when there are
+# actually parameters from a file in this listing.
+set display_warning_p 0
+
 lappend table_def [list attr_value "Value" no_sort \
 	{<td>
 	   <input name=params.$parameter_id value=\"$attr_value\" size=50>
-           <font color=red><strong>[ad_parameter_from_file $parameter_name [uplevel set package_key]]</strong></font>
+	    <font color=red><strong>[if { ![empty_string_p [ad_parameter_from_file $parameter_name [uplevel set package_key]]] } { uplevel set display_warning_p 1 } ; ad_parameter_from_file $parameter_name [uplevel set package_key]]</strong></font>
 	    </td>}]
 
 append additional_sql [ad_order_by_from_sort_spec $orderby $table_def]
@@ -51,12 +55,6 @@
 <h2>Parameters for $instance_name</h2>
 [ad_context_bar [list "index" "Site Map"] "$instance_name Parameters"]
 <hr>
-Note text in red below the parameter entry fields indicates the value of this
-parameter is being overridden by an entry in the OpenACS parameter file.  The
-use of the parameter file is discouraged but some sites need it to provide
-instance-specific values for parameters independent of the apm_parameter
-tables.
-<hr>
 "
 
 if { ![empty_string_p $dimensional_list] } {
@@ -75,6 +73,19 @@
 <td><input type=submit value=\"Set Parameters\">
 </td></tr>" parameter_table $table_sql $table_def]
 
+
+if { $display_warning_p } {
+    append body "
+Note text in red below the parameter entry fields indicates the value of this
+parameter is being overridden by an entry in the OpenACS parameter file.  The
+use of the parameter file is discouraged but some sites need it to provide
+instance-specific values for parameters independent of the apm_parameter
+tables.
+<hr>
+"
+}
+
+
 ns_return 200 text/html "$body
 <blockquote>
 <form method=post action=parameter-set-2>