From 2fe6663fdb250a3f20a8eede78973acab43aaf8b Mon Sep 17 00:00:00 2001 From: Craig Earls Date: Sat, 22 Aug 2015 18:47:05 -0700 Subject: Insert an extra newline if EOBP is not on its own line when you add an act. --- lisp/ledger-xact.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'lisp/ledger-xact.el') diff --git a/lisp/ledger-xact.el b/lisp/ledger-xact.el index 64f69cbe..b10434ac 100644 --- a/lisp/ledger-xact.el +++ b/lisp/ledger-xact.el @@ -89,8 +89,9 @@ MOMENT is an encoded date" (when (and (eobp) last-xact-start) (let ((end (cadr (ledger-navigate-find-xact-extents last-xact-start)))) (goto-char end) - (if (eobp) + (if (= (line-beginning-position) (line-end-position)) (insert "\n") + (insert "\n\n") (forward-line)))))) (defun ledger-xact-iterate-transactions (callback) -- cgit v1.2.3