update packages

This commit is contained in:
2021-01-08 19:32:30 +01:00
parent ce8f24d28a
commit f5649dceab
467 changed files with 26642 additions and 22487 deletions

View File

@@ -1,6 +1,6 @@
(define-package "ledger-mode" "20200530.1710" "Helper code for use with the \"ledger\" command-line tool"
(define-package "ledger-mode" "20210106.227" "Helper code for use with the \"ledger\" command-line tool"
'((emacs "25.1"))
:commit "f8463744191b4feb9fea54190917663f7ba26102")
:commit "bcd8cefb720702db88986a52bb66e08e2e451c05")
;; Local Variables:
;; no-byte-compile: t
;; End:

View File

@@ -1186,7 +1186,26 @@ File: ledger-mode.info, Node: Hacking Ledger-mode, Next: Concept Index, Prev:
9 Hacking Ledger-mode
*********************
Work in Progress.
* Menu:
* Use org-like outlines::

File: ledger-mode.info, Node: Use org-like outlines, Prev: Hacking Ledger-mode, Up: Hacking Ledger-mode
9.1 Use org-like outlines
=========================
Some users like to have org-like outlines for their ledger files. A
suggested customization is to include something like the following in
your Emacs configuration:
(eval-after-load 'ledger-mode
(progn
;; org-cycle allows completion to work whereas outline-toggle-children does not
(define-key ledger-mode-map (kbd "TAB") #'org-cycle)
(add-hook 'ledger-mode-hook #'outline-minor-mode)
(font-lock-add-keywords 'ledger-mode outline-font-lock-keywords)))

File: ledger-mode.info, Node: Concept Index, Next: Command & Variable Index, Prev: Hacking Ledger-mode, Up: Top
@@ -1197,71 +1216,80 @@ Concept Index
[index]
* Menu:
* balance: Quick Balance Display. (line 6)
* Calc: Editing Amounts. (line 6)
* cleared: Marking Transactions. (line 6)
* balance: Quick Balance Display.
(line 6)
* Calc: Editing Amounts. (line 6)
* cleared: Marking Transactions. (line 6)
* customization, executable: Ledger Exec Customization Group.
(line 6)
(line 6)
* customization, faces: Ledger Faces Customization Group.
(line 6)
(line 6)
* customization, ledger-mode: Ledger Customization Group.
(line 6)
(line 6)
* customization, post: Ledger Post Customization Group.
(line 6)
(line 6)
* customization, reconcile: Ledger Reconcile Customization Group.
(line 6)
(line 6)
* customization, report: Ledger Report Customization Group.
(line 6)
(line 6)
* customization, test: Ledger Test Customization Group.
(line 6)
(line 6)
* customization, texi: Ledger Texi Customization Group.
(line 6)
* demo: Quick Demo. (line 6)
(line 6)
* demo: Quick Demo. (line 6)
* effective date: Setting a Transactions Effective Date.
(line 6)
* GNU Emacs Calculator: Editing Amounts. (line 6)
* installation: Quick Installation. (line 6)
* menu: Menus. (line 6)
* pending: Marking Transactions. (line 6)
(line 6)
* folding: Use org-like outlines.
(line 10)
* GNU Emacs Calculator: Editing Amounts. (line 6)
* installation: Quick Installation. (line 6)
* menu: Menus. (line 6)
* org: Use org-like outlines.
(line 10)
* outline: Use org-like outlines.
(line 10)
* pending: Marking Transactions. (line 6)
* reconciliation, account changing: Changing Reconciliation Account.
(line 6)
(line 6)
* reconciliation, basics: Basics of Reconciliation.
(line 6)
(line 6)
* reconciliation, finalizing: Finalize Reconciliation.
(line 6)
(line 6)
* reconciliation, starting: Starting a Reconciliation.
(line 6)
(line 6)
* reconciliation, target changing: Changing Reconciliation Target.
(line 6)
(line 6)
* reconciliation, transaction adding and deleting: Adding and Deleting Transactions during Reconciliation.
(line 6)
(line 6)
* reconciliation, transaction editing: Edit Transactions During Reconciliation.
(line 6)
(line 6)
* reconciliation, transaction marking: Mark Transactions Pending.
(line 6)
(line 6)
* report, adding and editing: Adding and Editing Reports.
(line 6)
(line 6)
* report, custom command: Make Report Transactions Active.
(line 6)
* report, custom variable: Expansion Formats. (line 6)
(line 6)
* report, custom variable: Expansion Formats. (line 6)
* report, order reversing: Reversing Report Order.
(line 6)
* report, running: Running Basic Reports. (line 6)
* transaction, adding: Adding Transactions. (line 6)
* transaction, copying: Copying Transactions. (line 6)
* transaction, deleting: Deleting Transactions. (line 6)
(line 6)
* report, running: Running Basic Reports.
(line 6)
* transaction, adding: Adding Transactions. (line 6)
* transaction, copying: Copying Transactions. (line 6)
* transaction, deleting: Deleting Transactions.
(line 6)
* transaction, display filtering: Narrowing Transactions.
(line 6)
* transaction, editing amounts: Editing Amounts. (line 6)
(line 6)
* transaction, editing amounts: Editing Amounts. (line 6)
* transaction, formatting: Formatting Transactions.
(line 6)
* transaction, marking: Marking Transactions. (line 6)
(line 6)
* transaction, marking: Marking Transactions. (line 6)
* transaction, narrowing: Narrowing Transactions.
(line 6)
(line 6)
* transaction, navigation: Navigating Transactions.
(line 6)
* transaction, sorting: Sorting Transactions. (line 6)
* uncleared: Marking Transactions. (line 6)
(line 6)
* transaction, sorting: Sorting Transactions. (line 6)
* uncleared: Marking Transactions. (line 6)

File: ledger-mode.info, Node: Command & Variable Index, Next: Keystroke Index, Prev: Concept Index, Up: Top
@@ -1514,9 +1542,10 @@ Node: Ledger Texi Customization Group46262
Node: Generating Ledger Regression Tests46754
Node: Embedding Example results in Ledger Documentation47017
Node: Hacking Ledger-mode47306
Node: Concept Index47514
Node: Command & Variable Index52427
Node: Keystroke Index60537
Node: Use org-like outlines47531
Node: Concept Index48196
Node: Command & Variable Index53712
Node: Keystroke Index61822

End Tag Table

View File

@@ -102,6 +102,14 @@ simply concatenated (no quoting)."
:package-version '(ledger-mode . "4.0.0")
:group 'ledger-report)
(defcustom ledger-report-native-highlighting-arguments '("--color" "--force-color")
"List of strings to pass to ledger when `ledger-report-use-native-highlighting' is non-nil.
If you are using hledger instead of ledger, you might want to set
this variable to `(\"--color=always\")'."
:type '(repeat string)
:group 'ledger-report)
(defcustom ledger-report-auto-width t
"When non-nil, tell ledger about the width of the report window."
:type 'boolean
@@ -149,7 +157,6 @@ Calls `shrink-window-if-larger-than-buffer'."
(defvar ledger-report-cmd nil)
(defvar ledger-report-name-prompt-history nil)
(defvar ledger-report-cmd-prompt-history nil)
(defvar ledger-original-window-cfg nil)
(defvar ledger-report-saved nil)
(defvar ledger-minibuffer-history nil)
(defvar ledger-report-mode-abbrev-table)
@@ -278,8 +285,7 @@ used to generate the buffer, navigating the buffer, etc."
(edit (not (null current-prefix-arg))))
(list rname edit))))
(let* ((file (ledger-master-file))
(buf (find-file-noselect file))
(wcfg (current-window-configuration)))
(buf (find-file-noselect file)))
(with-current-buffer
(pop-to-buffer (get-buffer-create ledger-report-buffer-name))
(with-silent-modifications
@@ -288,7 +294,6 @@ used to generate the buffer, navigating the buffer, etc."
(set (make-local-variable 'ledger-report-saved) nil)
(set (make-local-variable 'ledger-buf) buf)
(set (make-local-variable 'ledger-report-name) report-name)
(set (make-local-variable 'ledger-original-window-cfg) wcfg)
(set (make-local-variable 'ledger-report-is-reversed) nil)
(set (make-local-variable 'ledger-report-current-month) nil)
(set 'ledger-master-file file)
@@ -454,7 +459,7 @@ MONTH is of the form (YEAR . INDEX) where INDEX ranges from
,@(when ledger-report-auto-width
`("--columns" ,(format "%d" (- (window-width) 1))))
,@(when ledger-report-use-native-highlighting
'("--color" "--force-color"))
ledger-report-native-highlighting-arguments)
,@(when ledger-report-use-strict
'("--strict"))))
@@ -490,7 +495,7 @@ Optionally EDIT the command."
(defun ledger-report--add-links ()
"Replace file and line annotations with buttons."
(while (re-search-forward "^\\(/[^:]+\\)?:\\([0-9]+\\)?:" nil t)
(while (re-search-forward "^\\(\\(?:/\\|[a-zA-Z]:[\\/]\\)[^:]+\\)?:\\([0-9]+\\)?:" nil t)
(let ((file (match-string 1))
(line (string-to-number (match-string 2))))
(delete-region (match-beginning 0) (match-end 0))
@@ -587,13 +592,13 @@ IGNORE-AUTO and NOCONFIRM are for compatibility with
(pop-to-buffer cur-buf))))
(defun ledger-report-quit ()
"Quit the ledger report buffer."
"Quit the ledger report buffer and kill its buffer."
(interactive)
(ledger-report-goto)
(set-window-configuration ledger-original-window-cfg)
(kill-buffer (get-buffer ledger-report-buffer-name)))
(unless (buffer-live-p (get-buffer ledger-report-buffer-name))
(user-error "No ledger report buffer"))
(quit-windows-on ledger-report-buffer-name 'kill))
(define-obsolete-function-alias 'ledger-report-kill #'ledger-report-quit)
(define-obsolete-function-alias 'ledger-report-kill #'ledger-report-quit "2018-03-18")
(defun ledger-report-edit-reports ()
"Edit the defined ledger reports."

View File

@@ -135,8 +135,10 @@ MOMENT is an encoded date"
mark desc)))))
(forward-line))))
(defvar ledger-copy-transaction-insert-blank-line-after nil
"Non-nil means insert blank line after a transaction inserted with ledger-copy-transaction-at-point.")
(defcustom ledger-copy-transaction-insert-blank-line-after nil
"Non-nil means insert blank line after a transaction inserted with ledger-copy-transaction-at-point."
:type 'boolean
:group 'ledger)
(defun ledger-copy-transaction-at-point (date)
"Ask for a new DATE and copy the transaction under point to that date. Leave point on the first amount."