Index: openacs-4/packages/acs-subsite/www/pvt/set-on-vacation-until.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/pvt/set-on-vacation-until.tcl,v diff -u -N -r1.6 -r1.6.2.1 --- openacs-4/packages/acs-subsite/www/pvt/set-on-vacation-until.tcl 21 Jan 2018 00:35:29 -0000 1.6 +++ openacs-4/packages/acs-subsite/www/pvt/set-on-vacation-until.tcl 28 Dec 2021 11:15:00 -0000 1.6.2.1 @@ -22,11 +22,12 @@ set user_id [ad_conn user_id] -db_transaction { - # We update the users table to maintain compatibility with acs installations prior to user_vacations - set bind_vars [ad_tcl_vars_to_ns_set user_id on_vacation_until] - db_dml pvt_set_vacation_update "update users set no_alerts_until = :on_vacation_until where user_id = :user_id" -bind $bind_vars - +# We update the users table to maintain compatibility with acs +# installations prior to user_vacations +db_dml pvt_set_vacation_update { + update users set + no_alerts_until = :on_vacation_until + where user_id = :user_id } set home_link [ad_pvt_home_link]