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.25.2.6 -r1.25.2.7 --- openacs-4/packages/acs-subsite/www/shared/parameters.tcl 14 Feb 2023 11:19:03 -0000 1.25.2.6 +++ openacs-4/packages/acs-subsite/www/shared/parameters.tcl 23 Jul 2024 15:56:42 -0000 1.25.2.7 @@ -10,8 +10,16 @@ {scope "instance"} {return_url:localurl,optional "[ad_conn url]?[ad_conn query]"} {section ""} + {scroll_to:word ""} } +if {$scroll_to ne ""} { + add_body_handler -event load -script [subst -nocommands { + const scrollTarget = document.querySelectorAll('#$scroll_to')[0]; + window.scrollTo(0, scrollTarget.offsetTop - 90); + }] +} + if { $scope eq "global" } { permission::require_permission \ -object_id [acs_magic_object security_context_root] \