template::apm::before_upgrade (private)
template::apm::before_upgrade -from_version_name from_version_name \ -to_version_name to_version_name
Defined in packages/acs-templating/tcl/apm-callback-procs.tcl
before upgrade apm callback for acs-templating.
- Switches:
- -from_version_name (required)
- -to_version_name (required)
- Partial Call Graph (max 5 caller/called nodes):
- Testcases:
- No testcase defined.
Source code: apm_upgrade_logic -from_version_name $from_version_name -to_version_name $to_version_name -spec { 4.6.4 5.0d1 { db_transaction { # Change 'standard-lars' to 'standard' set package_id [apm_package_id_from_key "acs-templating"] set DefaultFormStyle [parameter::get -package_id $package_id -parameter DefaultFormStyle] if {$DefaultFormStyle eq "standard-lars"} { parameter::set_value -package_id $package_id -parameter DefaultFormStyle -value "standard" } db_foreach subsite { select package_id from apm_packages where package_key = 'acs-subsite' } { set DefaultFormStyle [parameter::get -package_id $package_id -parameter DefaultFormStyle] if {$DefaultFormStyle eq "standard-lars"} { parameter::set_value -package_id $package_id -parameter DefaultFormStyle -value "standard" } } } } 5.5.1d1 5.5.1d2 { # Removing invalid plugins for the new version of Xinha set package_id_templating [apm_package_id_from_key "acs-templating"] set plugins [parameter::get -package_id $package_id_templating -parameter "XinhaDefaultPlugins" -default ""] if { $plugins ne "" } { set del_pos [lsearch $plugins FullScreen] set plugins [lreplace $plugins $del_pos $del_pos] parameter::set_value -package_id $package_id_templating -parameter "XinhaDefaultPlugins" -value $plugins } } }XQL Not present: Generic, PostgreSQL, Oracle