sfos/ledger
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Cleanup dump variables

Browse source
This commit is contained in:
Craig Earls 2013-02-22 21:00:41 -07:00
parent fd2c6d87a2
commit aa10b6ea5d
1 changed files with 6 additions and 10 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

16
lisp/ldg-new.el
View file

@ -90,7 +90,6 @@
(forward-line 1))))))
(defun ledger-dump-variable (var)
(insert (format "%s: %S\n" (symbol-name var) (eval var))))
(defun ledger-mode-dump-variables ()
@ -128,15 +127,12 @@
(ledger-dump-variable 'ledger-register-line-format)
(insert "ldg-reports:\n")
(ledger-dump-variable 'ledger-reports)
(ledger-dump-variable 'ledger-report-format-specifiers)
(ledger-dump-variable 'ledger-report-buffer-name)
(insert "ldg-state:")
(ledger-dump-variable 'ledger-clear-whole-transactions)
(insert "ldg-xact:\n")
(ledger-dump-variable 'ledger-highlight-xact-under-point)
)
(ledger-dump-variable 'ledger-report-format-specifiers)
(ledger-dump-variable 'ledger-report-buffer-name)
(insert "ldg-state:")
(ledger-dump-variable 'ledger-clear-whole-transactions)
(insert "ldg-xact:\n")
(ledger-dump-variable 'ledger-highlight-xact-under-point))
(provide 'ledger)