From 7579ebb34dbd53309b7069c23fc7812a261aea97 Mon Sep 17 00:00:00 2001 From: Craig Earls Date: Wed, 6 Mar 2013 14:44:22 -0500 Subject: Added missing lisp files to CMakeList.txt --- lisp/CMakeLists.txt | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) (limited to 'lisp/CMakeLists.txt') diff --git a/lisp/CMakeLists.txt b/lisp/CMakeLists.txt index 949171b3..5341f67a 100644 --- a/lisp/CMakeLists.txt +++ b/lisp/CMakeLists.txt @@ -1,19 +1,21 @@ set(EMACS_LISP_SOURCES + ldg-commodities.el ldg-complete.el ldg-exec.el + ldg-fonts.el ldg-mode.el ldg-new.el + ldg-occur.el ldg-post.el ldg-reconcile.el ldg-regex.el ldg-register.el ldg-report.el + ldg-sort.el ldg-state.el ldg-test.el ldg-texi.el - ldg-xact.el - ledger.el - timeclock.el) + ldg-xact.el) # find emacs and complain if not found find_program(EMACS_EXECUTABLE emacs) -- cgit v1.2.3 From 7758100df9152bab243d9531518af76acdbc7287 Mon Sep 17 00:00:00 2001 From: Craig Earls Date: Thu, 7 Mar 2013 16:08:07 -0500 Subject: Caught another omission in the built list --- lisp/CMakeLists.txt | 1 + lisp/ldg-new.el | 1 + 2 files changed, 2 insertions(+) (limited to 'lisp/CMakeLists.txt') diff --git a/lisp/CMakeLists.txt b/lisp/CMakeLists.txt index 5341f67a..32a31001 100644 --- a/lisp/CMakeLists.txt +++ b/lisp/CMakeLists.txt @@ -3,6 +3,7 @@ set(EMACS_LISP_SOURCES ldg-complete.el ldg-exec.el ldg-fonts.el + ldg-init.el ldg-mode.el ldg-new.el ldg-occur.el diff --git a/lisp/ldg-new.el b/lisp/ldg-new.el index 4cebbba7..f888fd6c 100644 --- a/lisp/ldg-new.el +++ b/lisp/ldg-new.el @@ -43,6 +43,7 @@ (require 'ldg-occur) (require 'ldg-post) (require 'ldg-reconcile) +(require 'ldg-regex) (require 'ldg-register) (require 'ldg-report) (require 'ldg-sort) -- cgit v1.2.3 From 404e84cd445d41b3f2fc6cd775babf12864fcefc Mon Sep 17 00:00:00 2001 From: Craig Earls Date: Fri, 8 Mar 2013 18:53:02 -0500 Subject: Removed ldg-register.el functionality all contained in ldg-report --- lisp/CMakeLists.txt | 1 - lisp/ldg-new.el | 4 --- lisp/ldg-register.el | 86 ---------------------------------------------------- 3 files changed, 91 deletions(-) delete mode 100644 lisp/ldg-register.el (limited to 'lisp/CMakeLists.txt') diff --git a/lisp/CMakeLists.txt b/lisp/CMakeLists.txt index 32a31001..876b3548 100644 --- a/lisp/CMakeLists.txt +++ b/lisp/CMakeLists.txt @@ -10,7 +10,6 @@ set(EMACS_LISP_SOURCES ldg-post.el ldg-reconcile.el ldg-regex.el - ldg-register.el ldg-report.el ldg-sort.el ldg-state.el diff --git a/lisp/ldg-new.el b/lisp/ldg-new.el index f888fd6c..a9c70ff4 100644 --- a/lisp/ldg-new.el +++ b/lisp/ldg-new.el @@ -44,7 +44,6 @@ (require 'ldg-post) (require 'ldg-reconcile) (require 'ldg-regex) -(require 'ldg-register) (require 'ldg-report) (require 'ldg-sort) (require 'ldg-state) @@ -125,9 +124,6 @@ (ledger-dump-variable 'ledger-buffer-tracks-reconcile-buffer) (ledger-dump-variable 'ledger-reconcile-force-window-bottom) (ledger-dump-variable 'ledger-reconcile-toggle-to-pending) - (insert "ldg-register:\n") - (ledger-dump-variable 'ledger-register-date-format) - (ledger-dump-variable 'ledger-register-line-format) (insert "ldg-reports:\n") (ledger-dump-variable 'ledger-reports) (ledger-dump-variable 'ledger-report-format-specifiers) diff --git a/lisp/ldg-register.el b/lisp/ldg-register.el deleted file mode 100644 index bfd8d360..00000000 --- a/lisp/ldg-register.el +++ /dev/null @@ -1,86 +0,0 @@ -;;; ldg-register.el --- Helper code for use with the "ledger" command-line tool - -;; Copyright (C) 2003-2013 John Wiegley (johnw AT gnu DOT org) - -;; This file is not part of GNU Emacs. - -;; This is free software; you can redistribute it and/or modify it under -;; the terms of the GNU General Public License as published by the Free -;; Software Foundation; either version 2, or (at your option) any later -;; version. -;; -;; This is distributed in the hope that it will be useful, but WITHOUT -;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or -;; FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License -;; for more details. -;; -;; You should have received a copy of the GNU General Public License -;; along with GNU Emacs; see the file COPYING. If not, write to the -;; Free Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, -;; MA 02111-1307, USA. - -(require 'ldg-post) -(require 'ldg-state) - -(defgroup ledger-register nil - "" - :group 'ledger) - -(defcustom ledger-register-date-format "%m/%d/%y" - "*The date format used for ledger register reports." - :type 'string - :group 'ledger-register) - -(defcustom ledger-register-line-format "%s %-30.30s %-25.25s %15s\n" - "*The date format used for ledger register reports." - :type 'string - :group 'ledger-register) - -(defface ledger-register-pending-face - '((((background light)) (:weight bold)) - (((background dark)) (:weight bold))) - "Face used to highlight pending entries in a register report." - :group 'ledger-register) - -(defun ledger-register-render (data-buffer posts) - (dolist (post posts) - (let ((index 1)) - (dolist (xact (nthcdr 5 post)) - (let ((beg (point)) - (where - (with-current-buffer data-buffer - (cons - (nth 0 post) - (if ledger-clear-whole-transactions - (save-excursion - (goto-line (nth 1 post)) - (point-marker)) - (save-excursion - (goto-line (nth 0 xact)) - (point-marker))))))) - (insert (format ledger-register-line-format - (format-time-string ledger-register-date-format - (nth 2 post)) - (nth 4 post) (nth 1 xact) (nth 2 xact))) - (if (nth 3 xact) - (set-text-properties beg (1- (point)) - (list 'face 'ledger-register-pending-face - 'where where)) - (set-text-properties beg (1- (point)) - (list 'where where)))) - (setq index (1+ index))))) - (goto-char (point-min))) - -(defun ledger-register-generate (&optional data-buffer &rest args) - (let ((buf (or data-buffer (current-buffer)))) - (with-current-buffer (get-buffer-create "*ledger-register*") - (let ((pos (point)) - (inhibit-read-only t)) - (erase-buffer) - (ledger-register-render buf (apply #'ledger-exec-read buf args)) - (goto-char pos)) - (set-buffer-modified-p nil) - (toggle-read-only t) - (display-buffer (current-buffer) t)))) - -(provide 'ldg-register) -- cgit v1.2.3