daniel/emacs
1
2
Fork 0
Code Issues 7 Pull Requests Projects Releases Wiki Activity

update of packages

Browse Source
This commit is contained in:
Daniel Weschke
2023-11-04 19:26:41 +01:00
parent e162a12b58
commit 3b54a3236d
726 changed files with 297673 additions and 34585 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
lisp/ledger-mode/ledger-context.el
View File

@@ -36,6 +36,7 @@
(defconst ledger-separator-string "\\(\\s-\\s-+\\)")
(defconst ledger-amount-string ledger-amount-regexp)
(defconst ledger-commoditized-amount-string ledger-commoditized-amount-regexp)
(defconst ledger-cost-string ledger-cost-regexp)
(defconst ledger-balance-assertion-string ledger-balance-assertion-regexp)
(defconst ledger-comment-string "\\(?:[ \t]*\n\\)?[ \t]*;[ \t]*\\(.*?\\)")
(defconst ledger-nil-string "\\([ \t]+\\)")
@@ -66,7 +67,10 @@
(ledger-single-line-config date nil payee comment)
(ledger-single-line-config date nil payee)))
(list 'acct-transaction (list (ledger-single-line-config indent comment)
(ledger-single-line-config indent status nil account separator commoditized-amount nil cost nil balance-assertion)
(ledger-single-line-config indent status nil account separator commoditized-amount nil balance-assertion)
(ledger-single-line-config indent status nil account separator commoditized-amount nil cost comment)
(ledger-single-line-config indent status nil account separator commoditized-amount nil cost)
(ledger-single-line-config indent status nil account separator commoditized-amount comment)
(ledger-single-line-config indent status nil account separator commoditized-amount)
(ledger-single-line-config indent status nil account separator amount)
@@ -105,7 +109,7 @@ where the \"users\" point was."
(list line-type field fields)))
(defun ledger-thing-at-point ()
"Describe thing at points. Return 'transaction, 'posting, or nil.
"Describe thing at points. Return \='transaction, \='posting, or nil.
Leave point at the beginning of the thing under point"
(let ((here (point)))
(goto-char (line-beginning-position))