diff options
author | Craig Earls <enderw88@gmail.com> | 2013-02-05 12:33:42 -0700 |
---|---|---|
committer | Craig Earls <enderw88@gmail.com> | 2013-02-05 12:33:42 -0700 |
commit | 4d7c4929395421eb039f0d03afafaf55cffd686d (patch) | |
tree | 733c8c25741bd3777ab2503423dcc86dd8537247 /lisp/ldg-register.el | |
parent | d67c42207fa75b0b4715705b577a228eec05729a (diff) | |
download | fork-ledger-4d7c4929395421eb039f0d03afafaf55cffd686d.tar.gz fork-ledger-4d7c4929395421eb039f0d03afafaf55cffd686d.tar.bz2 fork-ledger-4d7c4929395421eb039f0d03afafaf55cffd686d.zip |
Lisp code cleanup
Most of the files have been touched several times and the indentation structure
was wrong. I ran all the files through the emacs indent region function to get back to
a baseline
Diffstat (limited to 'lisp/ldg-register.el')
-rw-r--r-- | lisp/ldg-register.el | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/lisp/ldg-register.el b/lisp/ldg-register.el index 4c397049..adb37a1a 100644 --- a/lisp/ldg-register.el +++ b/lisp/ldg-register.el @@ -37,8 +37,8 @@ :group 'ledger-register) (defface ledger-register-pending-face - '((((background light)) (:weight bold)) - (((background dark)) (:weight bold))) + '((((background light)) (:weight bold)) + (((background dark)) (:weight bold))) "Face used to highlight pending entries in a register report." :group 'ledger-register) @@ -55,9 +55,9 @@ (save-excursion (goto-line (nth 1 post)) (point-marker)) - (save-excursion - (goto-line (nth 0 xact)) - (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)) @@ -66,8 +66,8 @@ (set-text-properties beg (1- (point)) (list 'face 'ledger-register-pending-face 'where where)) - (set-text-properties beg (1- (point)) - (list 'where where)))) + (set-text-properties beg (1- (point)) + (list 'where where)))) (setq index (1+ index))))) (goto-char (point-min)) ) |