Update all the packages

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

diff --git a/lisp/my-file-modes.el b/lisp/my-file-modes.el
index 6020b4cf2e8848197e7c6cc453f8aa264d3ad0bb..60427a6ffcfd188ce2b9286e57c31129ca34b480 100644 (file)
--- a/lisp/my-file-modes.el
+++ b/lisp/my-file-modes.el
@@ -38,9 +38,13 @@
 (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)
+  (setq ledger-reconcile-default-commodity "AUD")
+  (setq ledger-clear-whole-transactions t))
+
 (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)
 
@@ -61,11 +65,6 @@
 (require 'ssh-file-modes)
 
 (when (require 'stumpwm-mode nil 'noerror)
-  (add-hook 'find-file-hook
-            (lambda ()
-              (when (string=
-                     ".stumpwmrc"
-                     (file-name-nondirectory (buffer-file-name)))
-                (stumpwm-mode)))))
+  (add-to-list 'auto-mode-alist '("/\\.stumpwmrc\\'" . stumpwm-mode)))
 
 (require 'yaml-mode)