diff options
| author | Craig Earls <enderw88@gmail.com> | 2013-02-26 15:37:15 -0700 |
|---|---|---|
| committer | Craig Earls <enderw88@gmail.com> | 2013-02-26 15:37:15 -0700 |
| commit | a40d9f721fa237ed61b6dda7d18e86d18d150db7 (patch) | |
| tree | 686289505b3986e26cef942566eed444c8492897 /lisp/ldg-mode.el | |
| parent | 929175216dc55544c8c5911902014c7727a95fd7 (diff) | |
| parent | 5e0e7e0a973f8a323decbf818e66a6af3ba218fd (diff) | |
| download | ledger-a40d9f721fa237ed61b6dda7d18e86d18d150db7.tar.gz ledger-a40d9f721fa237ed61b6dda7d18e86d18d150db7.tar.bz2 ledger-a40d9f721fa237ed61b6dda7d18e86d18d150db7.zip | |
Merge branch 'next' into ledger-mode-automatic-transactions
Diffstat (limited to 'lisp/ldg-mode.el')
| -rw-r--r-- | lisp/ldg-mode.el | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/lisp/ldg-mode.el b/lisp/ldg-mode.el index 01a1b615..37c0f69e 100644 --- a/lisp/ldg-mode.el +++ b/lisp/ldg-mode.el @@ -76,6 +76,8 @@ (add-hook 'before-revert-hook 'ledger-remove-overlays nil t) (make-variable-buffer-local 'highlight-overlay) + (ledger-init-load-init-file) + (let ((map (current-local-map))) (define-key map [(control ?c) (control ?a)] 'ledger-add-transaction) (define-key map [(control ?c) (control ?b)] 'ledger-post-edit-amount) @@ -126,6 +128,8 @@ (define-key map [toggle-post] '(menu-item "Toggle Current Posting" ledger-toggle-current)) (define-key map [toggle-xact] '(menu-item "Toggle Current Transaction" ledger-toggle-current-entry)) (define-key map [sep4] '(menu-item "--")) + (define-key map [edit-amount] '(menu-item "Reconcile Account" ledger-reconcile)) + (define-key map [sep6] '(menu-item "--")) (define-key map [edit-amount] '(menu-item "Calc on Amount" ledger-post-edit-amount)) (define-key map [sep] '(menu-item "--")) (define-key map [delete-xact] '(menu-item "Delete Entry" ledger-delete-current-transaction)) |