Merge pull request #389 from thdox/untabify-emacs-lisp2

[emacs] Untabify emacs lisp
This commit is contained in:
Craig Earls 2015-02-10 14:27:48 -07:00
commit 6b668974a4
19 changed files with 609 additions and 603 deletions

View file

@ -1,8 +1,12 @@
((nil . ((tab-width . 2) ;;; Directory Local Variables
;;; For more information see (info "(emacs) Directory Variables")
((nil
(tab-width . 2)
(sentence-end-double-space . t) (sentence-end-double-space . t)
(bug-reference-url-format (bug-reference-url-format . "http://bugs.ledger-cli.org/show_bug.cgi?id=%s"))
. "http://bugs.ledger-cli.org/show_bug.cgi?id=%s"))) (c-mode
(c-mode . ((c-file-style . "ledger") (c-file-style . "ledger")
(c-style-alist (c-style-alist
("ledger" ("ledger"
(indent-tabs-mode) (indent-tabs-mode)
@ -24,7 +28,9 @@
(arglist-close . +) (arglist-close . +)
(inline-open . 0) (inline-open . 0)
(brace-list-open . 0) (brace-list-open . 0)
(topmost-intro-cont first c-lineup-topmost-intro-cont (topmost-intro-cont first c-lineup-topmost-intro-cont c-lineup-gnu-DEFUN-intro-cont))
c-lineup-gnu-DEFUN-intro-cont))
(c-special-indent-hook . c-gnu-impose-minimum) (c-special-indent-hook . c-gnu-impose-minimum)
(c-block-comment-prefix . "")))))) (c-block-comment-prefix . ""))))
(emacs-lisp-mode
(indent-tabs-mode)))

View file

@ -1,5 +1,5 @@
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; Ledger ;; Ledger
;; Maybe later add this to the expense repo once it settles ;; Maybe later add this to the expense repo once it settles
(add-to-list 'load-path "/home/adamsrl/.emacs.d/addons/ledger") (add-to-list 'load-path "/home/adamsrl/.emacs.d/addons/ledger")

View file

@ -38,7 +38,7 @@
:group 'ledger) :group 'ledger)
(defun ledger-fontify-buffer-part (&optional beg end len) (defun ledger-fontify-buffer-part (&optional beg end len)
"Fontify buffer from BEG to END, length LEN." "Fontify buffer from BEG to END, length LEN."
(save-excursion (save-excursion
(unless beg (setq beg (point-min))) (unless beg (setq beg (point-min)))
(unless end (setq end (point-max))) (unless end (setq end (point-max)))