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

Restored tabs that had been converted to spaces

Browse source
This commit is contained in:
John Wiegley 2012-03-16 03:00:39 -05:00
parent 11067d9cc6
commit ecd2ece195
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lisp/ledger.el
View file

@ -128,12 +128,12 @@ text that should replace the format specifier."
(defvar bold 'bold) (defvar bold 'bold)
(defvar ledger-font-lock-keywords (defvar ledger-font-lock-keywords
'(("\\( \\| \\|^\\)\\(;.*\\)" 2 font-lock-comment-face) '(("\\( \\| \\|^\\)\\(;.*\\)" 2 font-lock-comment-face)
("^[0-9]+[-/.=][-/.=0-9]+\\s-+\\(([^)]+)\\s-+\\)?\\([^*].+?\\)\\(\\( ;\\| ;\\|$\\)\\)" 2 bold) ("^[0-9]+[-/.=][-/.=0-9]+\\s-+\\(([^)]+)\\s-+\\)?\\([^*].+?\\)\\(\\( ;\\| ;\\|$\\)\\)" 2 bold)
;;("^[0-9]+[-/.=][-/.=0-9]+\\s-+\\(([^)]+)\\s-+\\)?\\([*].+?\\)\\(\\( ;\\| ;\\|$\\)\\)" ;;("^[0-9]+[-/.=][-/.=0-9]+\\s-+\\(([^)]+)\\s-+\\)?\\([*].+?\\)\\(\\( ;\\| ;\\|$\\)\\)"
;; 2 font-lock-type-face) ;; 2 font-lock-type-face)
("^\\s-+\\([*]\\s-*\\)?\\(\\([[(]\\)?\\([^*;]\\)+?\\(:\\|\\s-\\)[^]); ("^\\s-+\\([*]\\s-*\\)?\\(\\([[(]\\)?\\([^*;]\\)+?\\(:\\|\\s-\\)[^]);
]+?\\([])]\\)?\\)\\( \\| \\|$\\)" ]+?\\([])]\\)?\\)\\( \\| \\|$\\)"
2 font-lock-keyword-face) 2 font-lock-keyword-face)
("^\\([~=].+\\)" 1 font-lock-function-name-face) ("^\\([~=].+\\)" 1 font-lock-function-name-face)
("^\\([A-Za-z]+ .+\\)" 1 font-lock-function-name-face)) ("^\\([A-Za-z]+ .+\\)" 1 font-lock-function-name-face))