From 80492683e5b7e29ff8c33bb228be235eda69edce Mon Sep 17 00:00:00 2001 From: John Wiegley Date: Thu, 10 Feb 2005 07:49:18 +0000 Subject: [PATCH] (ledger-do-reconcile): Fixed a marker problem that was causing entries to not be reconciled. --- ledger.el | 8 ++++++-- 1 file changed, 6 insertions(+), 2 deletions(-) diff --git a/ledger.el b/ledger.el index 2c0f8677..9772e9a8 100644 --- a/ledger.el +++ b/ledger.el @@ -323,9 +323,13 @@ Return the difference in the format of a time value." (if (nth 1 item) (set-text-properties beg (1- (point)) (list 'face 'bold - 'where (nth 0 item))) + 'where + (with-current-buffer buf + (copy-marker (nth 0 item))))) (set-text-properties beg (1- (point)) - (list 'where (nth 0 item))))))) + (list 'where + (with-current-buffer buf + (copy-marker (nth 0 item))))))))) (goto-char (point-min)) (set-buffer-modified-p nil) (toggle-read-only t)))