diff options
| author | Craig Earls <enderw88@gmail.com> | 2013-02-09 17:45:31 -0700 |
|---|---|---|
| committer | Craig Earls <enderw88@gmail.com> | 2013-02-09 17:45:31 -0700 |
| commit | 2b55ef7dab335f2ae914912d8e541f6228f57f19 (patch) | |
| tree | 1fa6eb823694159c19d97d9f3217ec3397fdf874 | |
| parent | f89d6c4419551187a3ed9755d43db959c18938f1 (diff) | |
| download | fork-ledger-2b55ef7dab335f2ae914912d8e541f6228f57f19.tar.gz fork-ledger-2b55ef7dab335f2ae914912d8e541f6228f57f19.tar.bz2 fork-ledger-2b55ef7dab335f2ae914912d8e541f6228f57f19.zip | |
Added menu entry to customize ledger mode
| -rw-r--r-- | lisp/ldg-mode.el | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/ldg-mode.el b/lisp/ldg-mode.el index 4754e423..83b5e5b4 100644 --- a/lisp/ldg-mode.el +++ b/lisp/ldg-mode.el @@ -98,6 +98,9 @@ customizable to ease retro-entry.") (define-key map [sep5] '(menu-item "--")) (define-key map [set-month] '(menu-item "Set Month" ledger-set-month :enable ledger-works)) (define-key map [set-year] '(menu-item "Set Year" ledger-set-year :enable ledger-works)) + (define-key map [cust] '(menu-item "Customize Ledger Mode" (lambda () + (interactive) + (customize-group 'ledger)))) (define-key map [sep1] '("--")) (define-key map [sort-buff] '(menu-item "Sort Buffer" ledger-sort-buffer)) (define-key map [sort-reg] '(menu-item "Sort Region" ledger-sort-region :enable mark-active)) |