From 637679c0cb14523b36ce41f615e144580e2d7d96 Mon Sep 17 00:00:00 2001 From: Steve Purcell Date: Wed, 10 Dec 2014 09:17:32 +0000 Subject: [emacs] Fix more byte compilation and other layout issues --- lisp/ledger-test.el | 12 ++++++++++++ lisp/ledger-xact.el | 7 ++++++- 2 files changed, 18 insertions(+), 1 deletion(-) diff --git a/lisp/ledger-test.el b/lisp/ledger-test.el index 5f9f02fa..2db44c2b 100644 --- a/lisp/ledger-test.el +++ b/lisp/ledger-test.el @@ -19,6 +19,16 @@ ;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, ;; MA 02110-1301 USA. +;;; Commentary: + +;;; Code: + +(declare-function ledger-mode "ledger-mode") ; TODO: fix this cyclic dependency +(declare-function org-narrow-to-subtree "org") +(declare-function org-entry-get "org") +(declare-function outline-back-to-heading "outline") +(declare-function outline-next-heading "outline") + (defgroup ledger-test nil "Definitions for the Ledger testing framework" :group 'ledger) @@ -125,3 +135,5 @@ (cd prev-directory))))))) (provide 'ledger-test) + +;;; ledger-test.el ends here diff --git a/lisp/ledger-xact.el b/lisp/ledger-xact.el index 6df5b60b..29f6f4f0 100644 --- a/lisp/ledger-xact.el +++ b/lisp/ledger-xact.el @@ -25,6 +25,11 @@ ;;; Code: +(require 'eshell) +(require 'ledger-regex) +(require 'ledger-navigate) +;; TODO: This file depends on code in ledger-mode.el, which depends on this. + (defcustom ledger-highlight-xact-under-point t "If t highlight xact under point." :type 'boolean @@ -142,7 +147,7 @@ MOMENT is an encoded date" (goto-char (match-beginning 0))))) (defun ledger-delete-current-transaction (pos) - "Delete the transaction surrounging point." + "Delete the transaction surrounging POS." (interactive "d") (let ((bounds (ledger-navigate-find-xact-extents pos))) (delete-region (car bounds) (cadr bounds)))) -- cgit v1.2.3