]> code.delx.au - dotemacs/blob - lisp/my-file-modes.el
ledger-mode: wider lines for posts
[dotemacs] / lisp / my-file-modes.el
1 ;;; -*- lexical-binding: t -*-
2
3 (setq-default indent-tabs-mode nil)
4 (setq-default require-final-newline t)
5
6 (require 'cc-mode)
7 (setq c-auto-align-backslashes nil)
8 (setq c-default-style '((java-mode . "java")
9 (awk-mode . "awk")
10 (other . "stroustrup")))
11
12 (require 'coffee-mode)
13 (setq coffee-tab-width 4)
14
15 (require 'dockerfile-mode)
16
17 (require 'git-modes)
18
19 (require 'groovy-mode)
20 (add-to-list 'auto-mode-alist '("\\.groovy\\'" . groovy-mode))
21
22 (require 'haskell-mode)
23
24 (require 'json-mode)
25 (require 'js)
26 (add-hook 'json-mode-hook
27 (lambda ()
28 (set (make-local-variable 'js-indent-level) 2)))
29
30 (require 'js2-mode)
31 (add-to-list 'auto-mode-alist '("\\.js\\'" . js2-mode))
32 (add-to-list 'interpreter-mode-alist '("node" . js2-mode))
33 (setq js2-concat-multiline-strings 'eol)
34 (setq js2-highlight-external-variables nil)
35 (setq js2-mode-show-parse-errors nil)
36 (setq js2-mode-show-strict-warnings nil)
37 (setq js--declaration-keyword-re "x^") ; declarations should have normal indentation
38 (when (require 'tern nil 'noerror)
39 (add-hook 'js2-mode-hook (lambda () (tern-mode t))))
40
41 (when (require 'ledger-mode nil 'noerror)
42 (add-to-list 'auto-mode-alist '("\\.ledger\\'" . ledger-mode))
43 (setq ledger-post-amount-alignment-column 72))
44
45 (require 'markdown-mode)
46 (define-key markdown-mode-map (kbd "M-{") 'markdown-beginning-of-block)
47 (define-key markdown-mode-map (kbd "M-}") 'markdown-end-of-block)
48 (setq markdown-command "markdown_py -x markdown.extensions.smart_strong -x markdown.extensions.fenced_code -x markdown.extensions.nl2br")
49 (add-to-list 'auto-mode-alist '("\\.mdown\\'" . markdown-mode) t)
50
51 (require 'pkgbuild-mode)
52
53 (require 'python)
54 (add-hook 'python-mode-hook
55 (lambda ()
56 (setq forward-sexp-function nil)
57 (set (make-local-variable 'python-indent-offset) 4)))
58
59
60 (require 'scala-mode)
61
62 (require 'slime)
63 (setq inferior-lisp-program "sbcl")
64
65 (require 'ssh-file-modes)
66
67 (when (require 'stumpwm-mode nil 'noerror)
68 (add-to-list 'auto-mode-alist '("/\\.stumpwmrc\\'" . stumpwm-mode)))
69
70 (require 'yaml-mode)