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)))