diff --git a/test/agent/src/bindings/account.h b/test/agent/src/bindings/account.h
index b9a26004a10b1e922a4737345c97038017c17ee4..83627ef27e76175632a638721f7d9a5b7971dac0 100644
--- a/test/agent/src/bindings/account.h
+++ b/test/agent/src/bindings/account.h
@@ -125,6 +125,30 @@ subscribe_buddy_binding(SCM accountID_str, SCM peer_uri_str, SCM flag_bool)
     return SCM_UNDEFINED;
 }
 
+static SCM
+add_contact_binding(SCM accountID_str, SCM uri_str)
+{
+    LOG_BINDING();
+
+    DRing::addContact(from_guile(accountID_str),
+                      from_guile(uri_str));
+
+    return SCM_UNDEFINED;
+}
+
+static SCM
+remove_contact_binding(SCM accountID_str, SCM uri_str, SCM ban_optional_bool)
+{
+    LOG_BINDING();
+
+    DRing::removeContact(from_guile(accountID_str),
+                         from_guile(uri_str),
+                         from_guile(ban_optional_bool));
+
+    return SCM_UNDEFINED;
+}
+
+
 static void
 install_account_primitives(void *)
 {
@@ -133,6 +157,8 @@ install_account_primitives(void *)
     define_primitive("send-register", 2, 0, 0, (void*) send_register_binding);
     define_primitive("account->archive", 2, 1, 0, (void*) export_to_file_binding);
     define_primitive("add", 1, 1, 0, (void*) add_account_binding);
+    define_primitive("add-contact", 2, 0, 0, (void*) add_contact_binding);
+    define_primitive("remove-contact", 2, 1, 0, (void*) remove_contact_binding);
     define_primitive("accept-trust-request", 2, 0, 0, (void*) accept_trust_request_binding);
     define_primitive("send-trust-request", 2, 1, 0, (void*) send_trust_request_binding);
     define_primitive("get-contacts", 1, 0, 0, (void*) get_contacts_binding);