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

6
lisp/ldg-new.el
View file

@ -90,7 +90,6 @@
(forward-line 1)))))) (forward-line 1))))))
(defun ledger-dump-variable (var) (defun ledger-dump-variable (var)
(insert (format "%s: %S\n" (symbol-name var) (eval var)))) (insert (format "%s: %S\n" (symbol-name var) (eval var))))
(defun ledger-mode-dump-variables () (defun ledger-mode-dump-variables ()
@ -133,10 +132,7 @@
(insert "ldg-state:") (insert "ldg-state:")
(ledger-dump-variable 'ledger-clear-whole-transactions) (ledger-dump-variable 'ledger-clear-whole-transactions)
(insert "ldg-xact:\n") (insert "ldg-xact:\n")
(ledger-dump-variable 'ledger-highlight-xact-under-point) (ledger-dump-variable 'ledger-highlight-xact-under-point))
)
(provide 'ledger) (provide 'ledger)