From 76519be8f9b2848610bd195e46d7edc134f0f6c5 Mon Sep 17 00:00:00 2001
From: Simon Michael <simon@joyful.com>
Date: Mon, 20 Jun 2016 11:08:23 -0700
Subject: [PATCH] ui: advertise E key on transaction, error screens

---
 hledger-ui/Hledger/UI/ErrorScreen.hs       | 1 +
 hledger-ui/Hledger/UI/TransactionScreen.hs | 1 +
 2 files changed, 2 insertions(+)

diff --git a/hledger-ui/Hledger/UI/ErrorScreen.hs b/hledger-ui/Hledger/UI/ErrorScreen.hs
index ff1146cd1..4833dc910 100644
--- a/hledger-ui/Hledger/UI/ErrorScreen.hs
+++ b/hledger-ui/Hledger/UI/ErrorScreen.hs
@@ -54,6 +54,7 @@ esDraw UIState{ -- aopts=_uopts@UIOpts{cliopts_=_copts@CliOpts{reportopts_=_ropt
         quickhelp = borderKeysStr [
            ("h", "help")
           ,("ESC", "cancel/top")
+          ,("E", "editor")
           ,("g", "reload")
           ,("q", "quit")
           ]
diff --git a/hledger-ui/Hledger/UI/TransactionScreen.hs b/hledger-ui/Hledger/UI/TransactionScreen.hs
index 354edce03..0b180758b 100644
--- a/hledger-ui/Hledger/UI/TransactionScreen.hs
+++ b/hledger-ui/Hledger/UI/TransactionScreen.hs
@@ -94,6 +94,7 @@ tsDraw UIState{aopts=UIOpts{cliopts_=CliOpts{reportopts_=ropts}}
           ,("up/down", "prev/next")
           --,("ESC", "cancel/top")
           -- ,("a", "add")
+          ,("E", "editor")
           ,("g", "reload")
           ,("q", "quit")
           ]