diff --git a/SoObjects/Contacts/SOGoContactGCSList.h b/SoObjects/Contacts/SOGoContactGCSList.h
index 56a309cec..89068a528 100644
--- a/SoObjects/Contacts/SOGoContactGCSList.h
+++ b/SoObjects/Contacts/SOGoContactGCSList.h
@@ -32,6 +32,9 @@
   NGVList *list;
 }
 
+- (NGVList *) vList;
+- (void) save;
+
 @end
 
 #endif /* SOGOCONTACTGCSLIST_H */
diff --git a/UI/Contacts/UIxListEditor.h b/UI/Contacts/UIxListEditor.h
index 72f3ce5af..a48a565c4 100644
--- a/UI/Contacts/UIxListEditor.h
+++ b/UI/Contacts/UIxListEditor.h
@@ -33,6 +33,8 @@
   id reference;
 }
 
+- (BOOL) cardReferences: (NSArray *) references contain: (NSString *) ref;
+
 @end
 
 #endif /* UIXLISTEDITOR_H */
diff --git a/UI/Contacts/UIxListEditor.m b/UI/Contacts/UIxListEditor.m
index aa18e5123..be347bbeb 100644
--- a/UI/Contacts/UIxListEditor.m
+++ b/UI/Contacts/UIxListEditor.m
@@ -24,6 +24,7 @@
 #import <Foundation/NSArray.h>
 #import <Foundation/NSString.h>
 
+#import <NGObjWeb/WORequest.h>
 #import <NGObjWeb/NSException+HTTP.h>
 #import <NGObjWeb/WOResponse.h>
 #import <Foundation/NSPropertyList.h>
diff --git a/UI/MailerUI/UIxMailMainFrame.h b/UI/MailerUI/UIxMailMainFrame.h
index 48907f926..1b20fa470 100644
--- a/UI/MailerUI/UIxMailMainFrame.h
+++ b/UI/MailerUI/UIxMailMainFrame.h
@@ -40,6 +40,8 @@
 - (WOResponse *) saveDragHandleStateAction;
 - (WOResponse *) saveFoldersStateAction;
 
+- (NSString *) formattedMailtoString: (NGVCard *) card;
+
 @end
 
 #endif /* UIXMAILMAINFRAME_H */
diff --git a/UI/MailerUI/UIxMailMainFrame.m b/UI/MailerUI/UIxMailMainFrame.m
index 881281b17..f0f858232 100644
--- a/UI/MailerUI/UIxMailMainFrame.m
+++ b/UI/MailerUI/UIxMailMainFrame.m
@@ -25,6 +25,7 @@
 #import <Foundation/NSUserDefaults.h>
 
 #import <NGCards/NGVCard.h>
+#import <NGCards/NGVCardReference.h>
 #import <NGCards/NGVList.h>
 #import <NGObjWeb/WOContext.h>
 #import <NGObjWeb/WORequest.h>
@@ -203,7 +204,7 @@
                                    acquire: NO];
               if ([contact isKindOfClass: [SOGoContactGCSList class]])
                 {
-                  list = [contact vList];
+                  list = [(SOGoContactGCSList *)contact vList];
                   cards = [list cardReferences];
                   count = [cards count];
                   for (i = 0; i < count; i++)
@@ -247,10 +248,10 @@
   NSArray *n;
   unsigned int max;
 
-  if ([card respondsToSelector: @selector (preferredEMail)])
+  if ([card isKindOfClass: [NGVCard class]])
     email = [card preferredEMail];
   else
-    email = [card email];
+    email = [(NGVCardReference *)card email];
 
   if (email == nil)
     email = (NSString*)[card firstChildWithTag: @"EMAIL"];
@@ -282,7 +283,7 @@
           rc = fn;
         }
       else
-        rc = email;
+        rc = [NSMutableString stringWithString: email];
     }
 
   return rc;