diff options
| author | Craig Earls <enderw88@gmail.com> | 2013-02-22 21:00:41 -0700 |
|---|---|---|
| committer | Craig Earls <enderw88@gmail.com> | 2013-02-22 21:00:41 -0700 |
| commit | aa10b6ea5d986a521478a595949afc3838855c63 (patch) | |
| tree | 38af7aaeac7f38331bce8a40166dcbcc1400d9d7 | |
| parent | fd2c6d87a2353b5cc116bcb886a6c18abb308438 (diff) | |
| download | fork-ledger-aa10b6ea5d986a521478a595949afc3838855c63.tar.gz fork-ledger-aa10b6ea5d986a521478a595949afc3838855c63.tar.bz2 fork-ledger-aa10b6ea5d986a521478a595949afc3838855c63.zip | |
Cleanup dump variables
| -rw-r--r-- | lisp/ldg-new.el | 16 |
1 files changed, 6 insertions, 10 deletions
diff --git a/lisp/ldg-new.el b/lisp/ldg-new.el index 64945dfa..d3a4bd02 100644 --- a/lisp/ldg-new.el +++ b/lisp/ldg-new.el @@ -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) |