Index: openacs-4/packages/acs-subsite/www/shared/parameters.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/shared/parameters.tcl,v
diff -u -N -r1.24 -r1.25
--- openacs-4/packages/acs-subsite/www/shared/parameters.tcl	2 Feb 2018 00:05:53 -0000	1.24
+++ openacs-4/packages/acs-subsite/www/shared/parameters.tcl	26 Jul 2018 15:23:16 -0000	1.25
@@ -82,15 +82,9 @@
 array set sections {}
 
 db_foreach select_params {} {
-    if { $section_name eq "" } {
-        set section_name "main"
-        set section_pretty "Main"
-    } else {
-        set section_name [string map {- {_} " " {_}} $section_name]
-        set section_pretty [string map {_ { }} $section_name]
-        set section_pretty "[string toupper [string index $section_pretty 0]][string range $section_pretty 1 end]"
-    }
-    
+    set section_name [string map {- {_} " " {_}} $section_name]
+    set section_pretty [string totitle [string map {_ { }} $section_name]]
+
     if { ![info exists sections($section_name)] } {
         set sec [list "-section" $section_name {legendtext "$section_pretty"}]
         ad_form -extend -name parameters -form [list $sec]
Index: openacs-4/packages/acs-subsite/www/shared/parameters.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/shared/parameters.xql,v
diff -u -N -r1.4 -r1.5
--- openacs-4/packages/acs-subsite/www/shared/parameters.xql	4 Apr 2010 14:51:47 -0000	1.4
+++ openacs-4/packages/acs-subsite/www/shared/parameters.xql	26 Jul 2018 15:23:16 -0000	1.5
@@ -29,7 +29,7 @@
       select p.parameter_name,
         coalesce(p.description, 'No Description') as description,
         v.attr_value,
-        coalesce(p.section_name, '') as section_name,
+        coalesce(p.section_name, 'main') as section_name,
         p.datatype
       from apm_parameters p left outer join
         (select v.parameter_id, v.attr_value
@@ -39,7 +39,12 @@
       where p.package_key = :package_key
         and p.scope = :scope
 	$section_where_clause
-      order  by section_name, parameter_name
+      order by
+        case when lower(section_name) = 'deprecated'
+          then null
+        when section_name is null
+          then '1'
+        else section_name end, parameter_name
     </querytext>
   </fullquery>