From ef5283d7f2dbc1a9fa7228e9877bcf1fca547ef0 Mon Sep 17 00:00:00 2001 From: Kenny Meyer Date: Fri, 9 Dec 2011 00:56:14 -0200 Subject: Add easy-menu for Emacs-mode --- lisp/ledger.el | 18 ++++++++++++++++++ 1 file changed, 18 insertions(+) diff --git a/lisp/ledger.el b/lisp/ledger.el index 2d15f090..56bc33cd 100644 --- a/lisp/ledger.el +++ b/lisp/ledger.el @@ -1316,6 +1316,24 @@ end of a ledger file which is included in some other file." (expand-file-name ledger-master-file) (buffer-file-name))) +(easy-menu-define ledger-menu ledger-mode-map + "Ledger menu" + '("Ledger" + ["New entry" ledger-add-entry t] + ["Toggle cleared status of current entry" ledger-toggle-current-entry t] + ["Set default year for entry" ledger-set-year t] + ["Set default month for entry" ledger-set-month t] + "--" + ["Reconcile uncleared entries for account" ledger-reconcile t] + "--" + "Reports" + ["Run a report" ledger-report t] + ["Go to report buffer" ledger-report-goto t] + ["Edit defined reports" ledger-report-edit t] + ["Save report definition" ledger-report-save t] + ["Re-run ledger report" ledger-report-redo t] + ["Kill report buffer" ledger-report-kill t])) + (provide 'ledger) ;;; ledger.el ends here -- cgit v1.2.3