From c26178acdddd320e8556905b95ce7e1f28fa7092 Mon Sep 17 00:00:00 2001
From: Simon Michael <simon@joyful.com>
Date: Sat, 18 Jun 2016 07:31:09 -0700
Subject: [PATCH] ui: reg: select latest txn by default again

---
 hledger-ui/Hledger/UI/RegisterScreen.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/hledger-ui/Hledger/UI/RegisterScreen.hs b/hledger-ui/Hledger/UI/RegisterScreen.hs
index 10beedecd..c6f7b1a4b 100644
--- a/hledger-ui/Hledger/UI/RegisterScreen.hs
+++ b/hledger-ui/Hledger/UI/RegisterScreen.hs
@@ -89,7 +89,7 @@ rsInit d reset ui@UIState{aopts=opts, ajournal=j, aScreen=s@RegisterScreen{..}}
     newitems' = listMoveTo newselidx newitems
       where
         newselidx = case (reset, listSelectedElement rsList) of
-                      (True, _)    -> 0
+                      (True, _)    -> endidx
                       (_, Nothing) -> endidx
                       (_, Just (_,RegisterScreenItem{rsItemTransaction=Transaction{tindex=ti}}))
                                    -> fromMaybe endidx $ findIndex ((==ti) . tindex . rsItemTransaction) displayitems