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 -r1.27 -r1.28
--- openacs-4/packages/acs-subsite/www/shared/parameters.tcl 11 Sep 2024 06:15:48 -0000 1.27
+++ openacs-4/packages/acs-subsite/www/shared/parameters.tcl 11 Mar 2025 18:30:46 -0000 1.28
@@ -14,7 +14,7 @@
}
if {$scroll_to ne ""} {
- add_body_handler -event load -script [subst -nocommands {
+ add_body_handler -event load -script [subst -nocommands {
const scrollTarget = document.querySelectorAll('#$scroll_to')[0];
window.scrollTo(0, scrollTarget.offsetTop - 90);
}]
@@ -113,8 +113,11 @@
set html [list size 50]
}
}
+ set help_text_suffix [expr {$attr_value eq $default_value \
+ ? "(value is default)"
+ : "(default: $default_value)"}]
set elm [list ${parameter_name}:text($widget),optional,nospell \
- {label {$parameter_name}} \
+ {label {$parameter_name $help_text_suffix}} \
{help_text {$description}} \
[list html $html]]
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 -r1.5 -r1.6
--- openacs-4/packages/acs-subsite/www/shared/parameters.xql 26 Jul 2018 15:23:16 -0000 1.5
+++ openacs-4/packages/acs-subsite/www/shared/parameters.xql 11 Mar 2025 18:30:46 -0000 1.6
@@ -24,21 +24,22 @@
-
+
select p.parameter_name,
coalesce(p.description, 'No Description') as description,
v.attr_value,
coalesce(p.section_name, 'main') as section_name,
- p.datatype
+ p.datatype,
+ p.default_value
from apm_parameters p left outer join
(select v.parameter_id, v.attr_value
from apm_parameter_values v
where (v.package_id = :package_id or v.package_id is null)) v
on p.parameter_id = v.parameter_id
where p.package_key = :package_key
and p.scope = :scope
- $section_where_clause
+ $section_where_clause
order by
case when lower(section_name) = 'deprecated'
then null
@@ -48,7 +49,7 @@
-
+
select p.parameter_name as c__parameter_name
from apm_parameters p left outer join
@@ -63,4 +64,3 @@
-