From 68ef8784a0b0bd16df296cc64c09bb0523c4a8a4 Mon Sep 17 00:00:00 2001
From: Ludovic Marcotte <lmarcotte@inverse.ca>
Date: Wed, 26 Aug 2015 08:27:45 -0400
Subject: [PATCH] (fix) added json call to get all mail accounts

---
 UI/MailerUI/UIxMailMainFrame.m | 15 +++++++++++++++
 1 file changed, 15 insertions(+)

diff --git a/UI/MailerUI/UIxMailMainFrame.m b/UI/MailerUI/UIxMailMainFrame.m
index 621ca4983..bb3afa4e4 100644
--- a/UI/MailerUI/UIxMailMainFrame.m
+++ b/UI/MailerUI/UIxMailMainFrame.m
@@ -118,6 +118,21 @@
   return [accounts jsonRepresentation];
 }
 
+- (WOResponse *) mailAccountsAction
+{
+  WOResponse *response;
+  NSString *s;
+
+  s = [self mailAccounts];
+  response = [self responseWithStatus: 200];
+
+  [response setHeader: @"text/plain; charset=utf-8"
+               forKey: @"content-type"];
+  [response appendContentString: s];
+
+  return response;
+}
+
 - (NSString *) userNames
 {
   NSArray *accounts, *userNames;