Index: openacs-4/packages/acs-authentication/tcl/sync-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-authentication/tcl/sync-procs.tcl,v diff -u -r1.44 -r1.44.2.1 --- openacs-4/packages/acs-authentication/tcl/sync-procs.tcl 23 Jul 2018 18:31:08 -0000 1.44 +++ openacs-4/packages/acs-authentication/tcl/sync-procs.tcl 13 Mar 2019 10:04:53 -0000 1.44.2.1 @@ -234,7 +234,7 @@ @param message Any error message to stick into the log. @return entry_id } { - set success_p_db [ad_decode $success_p 1 "t" "f"] + set success_p_db [expr {$success_p ? "t" : "f"}] set entry_id [db_nextval "auth_batch_job_entry_id_seq"]