Index: openacs-4/packages/acs-admin/www/users/merge-confirm.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-admin/www/users/merge-confirm.tcl,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/acs-admin/www/users/merge-confirm.tcl	30 May 2018 15:20:51 -0000	1.6
+++ openacs-4/packages/acs-admin/www/users/merge-confirm.tcl	27 Jun 2018 16:56:41 -0000	1.7
@@ -12,8 +12,8 @@
     context:onevalue
 } -validate {
     if_diff_authority {        
-        set from_authority_id [acs_user::get_element -user_id $from_user_id -element authority_id]
-        set to_authority_id [acs_user::get_element -user_id $to_user_id -element authority_id]
+        set from_authority_id [acs_user::get_user_info -user_id $from_user_id -element authority_id]
+        set to_authority_id [acs_user::get_user_info -user_id $to_user_id -element authority_id]
 	if { $from_authority_id ne $to_authority_id } {
 	    ad_complain "Merge only works for users from the same authority"
 	}