From 0f83f779a627964f7f9044afd383b7a9152545b9 Mon Sep 17 00:00:00 2001
From: Rémi Vanicat <vanicat@debian.org>
Date: Sat, 9 Feb 2013 14:42:52 +0100
Subject: On move event, save excursion before calling ledger-reconcile-visit

Otherwise, ledger-reconcile-visit might undo last move
---
 lisp/ldg-reconcile.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lisp/ldg-reconcile.el b/lisp/ldg-reconcile.el
index 5314f554..e0ba1ea7 100644
--- a/lisp/ldg-reconcile.el
+++ b/lisp/ldg-reconcile.el
@@ -262,7 +262,8 @@
 				 'previous-line
 				 'mouse-set-point
 				 'ledger-reconcile-toggle))
-      (ledger-reconcile-visit t)))
+      (save-excursion
+        (ledger-reconcile-visit t))))
 
 (defun ledger-reconcile (account)
   (interactive "sAccount to reconcile: ")
-- 
cgit v1.2.3