diff --git a/user-global/elisp/beancount.el b/user-global/elisp/beancount.el index 8cc600e..dbd7e0a 100644 --- a/user-global/elisp/beancount.el +++ b/user-global/elisp/beancount.el @@ -202,7 +202,7 @@ )) (defconst beancount-comments-regex - (concat ";[^\"\n]*$")) ; right part of the line after a comment symbol if no quote or newline is included + "[ ][ \t]+;.*\|^[;*].*") ; right part of the line after a comment symbol if no quote or newline is included (defconst beancount-empty-line-regex "^\\(\\s-+\\)" ;; maybe "^[ \t]+" is better @@ -409,10 +409,10 @@ Leave point at the beginning of the thing under point.") (defvar beancount-filename-main buffer-file-name "File name of the main beancount file for beancount-check.") -(defvar beancount-terminal-name "kitty" +(defvar beancount-terminal-name "foot" "Name of the terminal emulator to run fava.") -(defvar beancount-fava-exec "/bin/fava" +(defvar beancount-fava-exec "/usr/bin/fava" "Full path of fava executable.") (defvar beancount-install-dir nil @@ -447,6 +447,9 @@ Only useful if you have not installed Beancount properly in your PATH") (beancount--run beancount-check-program beancount-filename-main))) ; (file-relative-name buffer-file-name)))) +;;does not work currently! +;;use source /opt/fava/.env/bin/activate +;;fava /mnt/archiv/Finanzen/Transaktionen/transactions.beancount (defun beancount-fava () "Run `beancount-fava' and open the URL in the default browser." (interactive) @@ -736,7 +739,7 @@ Optionally also look at data in selected FILES." ((beancount-looking-at "^[A-za-z]+[A-za-z00-9 ]" 0 pos) (list (match-beginning 0) (match-end 0) ; (lambda (c) (company-ledger--fuzzy-word-match arg c)) - (company-ledger--get-all-postings))) + (company-ledger--get-all-postings))) ; (sort (company-ledger--get-all-postings) #'string-lessp))) ))))) ;; (sorted t))