update of packages

This commit is contained in:
2023-11-04 19:26:41 +01:00
parent e162a12b58
commit 3b54a3236d
726 changed files with 297673 additions and 34585 deletions

View File

@@ -155,9 +155,10 @@ Leave point on the first amount."
(let* ((extents (ledger-navigate-find-xact-extents (point)))
(transaction (buffer-substring-no-properties (car extents) (cadr extents)))
(encoded-date (ledger-parse-iso-date date)))
(push-mark)
(ledger-xact-find-slot encoded-date)
(insert transaction
(if ledger-copy-transaction-insert-blank-line-after
(if (and ledger-copy-transaction-insert-blank-line-after (not (eobp)))
"\n\n"
"\n"))
(beginning-of-line -1)
@@ -169,7 +170,7 @@ Leave point on the first amount."
(goto-char (match-beginning 0)))))
(defun ledger-delete-current-transaction (pos)
"Delete the transaction surrounging POS."
"Delete the transaction surrounding POS."
(interactive "d")
(let ((bounds (ledger-navigate-find-xact-extents pos)))
(delete-region (car bounds) (cadr bounds)))