Index: openacs-4/packages/acs-admin/lib/become.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-admin/lib/become.tcl,v
diff -u -N -r1.3 -r1.4
--- openacs-4/packages/acs-admin/lib/become.tcl	10 Jan 2007 21:21:59 -0000	1.3
+++ openacs-4/packages/acs-admin/lib/become.tcl	7 Aug 2017 23:47:45 -0000	1.4
@@ -14,7 +14,7 @@
 
 # Get the password and user ID
 
-if {![db_0or1row password "select password from users where user_id=$user_id"]} {
+if {![db_0or1row password {select password from users where user_id = :user_id}]} {
     ad_return_error "Couldn't find user $user_id" "Couldn't find user $user_id."
     return
 }
@@ -30,3 +30,9 @@
 ad_user_login $user_id
 ad_returnredirect $return_url
 
+
+# Local variables:
+#    mode: tcl
+#    tcl-indent-level: 4
+#    indent-tabs-mode: nil
+# End: