summaryrefslogtreecommitdiff
path: root/lisp/ldg-texi.el
diff options
context:
space:
mode:
authorCraig Earls <enderw88@gmail.com>2013-02-05 12:33:42 -0700
committerCraig Earls <enderw88@gmail.com>2013-02-05 12:33:42 -0700
commit4d7c4929395421eb039f0d03afafaf55cffd686d (patch)
tree733c8c25741bd3777ab2503423dcc86dd8537247 /lisp/ldg-texi.el
parentd67c42207fa75b0b4715705b577a228eec05729a (diff)
downloadfork-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-texi.el')
-rw-r--r--lisp/ldg-texi.el18
1 files changed, 9 insertions, 9 deletions
diff --git a/lisp/ldg-texi.el b/lisp/ldg-texi.el
index fefa7d2b..53e050ce 100644
--- a/lisp/ldg-texi.el
+++ b/lisp/ldg-texi.el
@@ -94,17 +94,17 @@
(if (string-match "\\$LEDGER" command)
(replace-match (format "%s -f \"%s\" %s" ledger-path
data-file ledger-normalization-args) t t command)
- (concat (format "%s -f \"%s\" %s " ledger-path
- data-file ledger-normalization-args) command)))
+ (concat (format "%s -f \"%s\" %s " ledger-path
+ data-file ledger-normalization-args) command)))
(defun ledger-texi-invoke-command (command)
(with-temp-buffer (shell-command command t (current-buffer))
- (if (= (point-min) (point-max))
- (progn
- (push-mark nil t)
- (message "Command '%s' yielded no result at %d" command (point))
- (ding))
- (buffer-string))))
+ (if (= (point-min) (point-max))
+ (progn
+ (push-mark nil t)
+ (message "Command '%s' yielded no result at %d" command (point))
+ (ding))
+ (buffer-string))))
(defun ledger-texi-write-test-data (name input)
(let ((path (expand-file-name name temporary-file-directory)))
@@ -149,7 +149,7 @@
(let ((section-name (if (string= section "smex")
"smallexample"
- "example"))
+ "example"))
(output (ledger-texi-invoke-command
(ledger-texi-expand-command command data-file))))
(insert "@" section-name ?\n output