update of packages
This commit is contained in:
@@ -121,7 +121,7 @@ if string is longer, it is not truncated unless
|
||||
(defcustom ledger-reconcile-sort-key "(0)"
|
||||
"Key for sorting reconcile buffer.
|
||||
|
||||
Possible values are '(date)', '(amount)', '(payee)' or '(0)' for
|
||||
Possible values are \"(date)\", \"(amount)\", \"(payee)\" or \"(0)\" for
|
||||
no sorting, i.e. using ledger file order."
|
||||
:type 'string
|
||||
:group 'ledger-reconcile)
|
||||
@@ -353,8 +353,8 @@ Return the number of uncleared xacts found."
|
||||
|
||||
(defun ledger-reconcile-finish ()
|
||||
"Mark all pending posting or transactions as cleared.
|
||||
Depends on ledger-reconcile-clear-whole-transactions, save the buffers
|
||||
and exit reconcile mode if `ledger-reconcile-finish-force-quit'"
|
||||
Depends on ledger-clear-whole-transactions, save the buffers and
|
||||
exit reconcile mode if `ledger-reconcile-finish-force-quit'"
|
||||
(interactive)
|
||||
(save-excursion
|
||||
(goto-char (point-min))
|
||||
@@ -577,15 +577,16 @@ moved and recentered. If they aren't strange things happen."
|
||||
|
||||
(with-current-buffer rbuf
|
||||
(if (> (ledger-reconcile-refresh) 0)
|
||||
(ledger-reconcile-change-target target))
|
||||
(ledger-display-balance)))))
|
||||
(ledger-reconcile-change-target target)
|
||||
(ledger-display-balance))))))
|
||||
|
||||
(defvar ledger-reconcile-mode-abbrev-table)
|
||||
|
||||
(defun ledger-reconcile-change-target (&optional target)
|
||||
"Change the TARGET amount for the reconciliation process."
|
||||
(interactive)
|
||||
(setq ledger-target (or target (ledger-read-commodity-string ledger-reconcile-target-prompt-string))))
|
||||
(setq ledger-target (or target (ledger-read-commodity-string ledger-reconcile-target-prompt-string)))
|
||||
(ledger-display-balance))
|
||||
|
||||
(defmacro ledger-reconcile-change-sort-key-and-refresh (sort-by)
|
||||
"Set the sort-key to SORT-BY."
|
||||
|
||||
Reference in New Issue
Block a user