sfos/ledger
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Indent & untabify

Browse source 
M-x mark-whole-buffer
M-x indent-region
M-x mark-whole-buffer
M-x untabify
This commit is contained in:
thdox 2014-05-17 16:52:06 +02:00
parent 35a36f33aa
commit d2db0f9102
18 changed files with 1146 additions and 1146 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lisp/ledger-schedule.el
View file

@ -206,8 +206,8 @@ returns true if the date meets the requirements"
(read (buffer-substring-no-properties (point-min) (point-max)))))) (read (buffer-substring-no-properties (point-min) (point-max))))))
(defun ledger-schedule-transform-auto-tree (descriptor-string-list) (defun ledger-schedule-transform-auto-tree (descriptor-string-list)
"Takes a lisp list of date descriptor strings, TREE, and returns a string with a lambda function of date." "Takes a lisp list of date descriptor strings, TREE, and returns a string with a lambda function of date."
;; use funcall to use the lambda function spit out here ;; use funcall to use the lambda function spit out here
(if (consp descriptor-string-list) (if (consp descriptor-string-list)
(let (result) (let (result)
(while (consp descriptor-string-list) (while (consp descriptor-string-list)

16
lisp/ledger-texi.el
View file

@ -20,18 +20,18 @@
;; MA 02110-1301 USA. ;; MA 02110-1301 USA.
(defgroup ledger-texi nil (defgroup ledger-texi nil
"Options for working on Ledger texi documentation" "Options for working on Ledger texi documentation"
:group 'ledger) :group 'ledger)
(defcustom ledger-texi-sample-doc-path "~/ledger/doc/sample.dat" (defcustom ledger-texi-sample-doc-path "~/ledger/doc/sample.dat"
"Location for sample data to be used in texi tests" "Location for sample data to be used in texi tests"
:type 'file :type 'file
:group 'ledger-texi) :group 'ledger-texi)
(defcustom ledger-texi-normalization-args "--args-only --columns 80" (defcustom ledger-texi-normalization-args "--args-only --columns 80"
"texi normalization for producing ledger output" "texi normalization for producing ledger output"
:type 'string :type 'string
:group 'ledger-texi) :group 'ledger-texi)
(defun ledger-update-test () (defun ledger-update-test ()
(interactive) (interactive)