ledger-mode: wider lines for posts

[dotemacs] / lisp / my-file-modes.el

diff --git a/lisp/my-file-modes.el b/lisp/my-file-modes.el
index c1719329567e7ca76cd1956d8bed6332816f688d..142e1a04f7c3908d8543e2810550aec7773e9f53 100644 (file)
--- a/lisp/my-file-modes.el
+++ b/lisp/my-file-modes.el
@@ -1,6 +1,7 @@
 ;;; -*- lexical-binding: t -*-
 
 (setq-default indent-tabs-mode nil)
+(setq-default require-final-newline t)
 
 (require 'cc-mode)
 (setq c-auto-align-backslashes nil)
@@ -31,9 +32,21 @@
 (add-to-list 'interpreter-mode-alist '("node" . js2-mode))
 (setq js2-concat-multiline-strings 'eol)
 (setq js2-highlight-external-variables nil)
+(setq js2-mode-show-parse-errors nil)
+(setq js2-mode-show-strict-warnings nil)
+(setq js--declaration-keyword-re "x^") ; declarations should have normal indentation
+(when (require 'tern nil 'noerror)
+  (add-hook 'js2-mode-hook (lambda () (tern-mode t))))
+
+(when (require 'ledger-mode nil 'noerror)
+  (add-to-list 'auto-mode-alist '("\\.ledger\\'" . ledger-mode))
+  (setq ledger-post-amount-alignment-column 72))
 
 (require 'markdown-mode)
+(define-key markdown-mode-map (kbd "M-{") 'markdown-beginning-of-block)
+(define-key markdown-mode-map (kbd "M-}") 'markdown-end-of-block)
 (setq markdown-command "markdown_py -x markdown.extensions.smart_strong -x markdown.extensions.fenced_code -x markdown.extensions.nl2br")
+(add-to-list 'auto-mode-alist '("\\.mdown\\'" . markdown-mode) t)
 
 (require 'pkgbuild-mode)
 
@@ -47,6 +60,11 @@
 (require 'scala-mode)
 
 (require 'slime)
-(setq inferior-lisp-program "clisp")
+(setq inferior-lisp-program "sbcl")
+
+(require 'ssh-file-modes)
+
+(when (require 'stumpwm-mode nil 'noerror)
+  (add-to-list 'auto-mode-alist '("/\\.stumpwmrc\\'" . stumpwm-mode)))
 
 (require 'yaml-mode)