Add cancel button to MIMP compose screen

diff --git a/imp/compose-mimp.php b/imp/compose-mimp.php
index f1f9ed4..b1fb59c 100644 (file)
--- a/imp/compose-mimp.php
+++ b/imp/compose-mimp.php
@@ -288,6 +288,12 @@ case _("Send"):
         break;
     }
     break;
+
+case _("Cancel"):
+    $imp_compose->deleteAllAttachments();
+    $imp_compose->destroy();
+    require IMP_BASE . '/mailbox-mimp.php';
+    exit;
 }
 
 /* Get the message cache ID. */

diff --git a/imp/templates/compose/compose-mimp.inc b/imp/templates/compose/compose-mimp.inc
index ae3a63d..a4c8314 100644 (file)
--- a/imp/templates/compose/compose-mimp.inc
+++ b/imp/templates/compose/compose-mimp.inc
@@ -48,6 +48,7 @@ if ($conf['user']['allow_folders'] && !$readonly_drafts) {
 }
 
 $f->add(new Horde_Mobile_submit(_("Expand Names"), 'a'));
+$f->add(new Horde_Mobile_submit(_("Cancel"), 'a'));
 
 $mimp_render->add($menu);
 $mimp_render->display();