Mercurial > dotfiles
comparison .elisp/settings/40.modes.el @ 223:739d96003993
af-no-clean-whitespace: make interactive for easy disabling when it is just noise.
author | Augie Fackler <durin42@gmail.com> |
---|---|
date | Mon, 20 Sep 2010 07:35:29 -0500 |
parents | b9b118dba61a |
children | 7ca719e40c58 |
comparison
equal
deleted
inserted
replaced
222:a2ea4a78e02c | 223:739d96003993 |
---|---|
18 (add-hook 'sh-mode-hook 'af-tab-fix) | 18 (add-hook 'sh-mode-hook 'af-tab-fix) |
19 (add-hook 'emacs-lisp-mode-hook 'af-tab-fix) | 19 (add-hook 'emacs-lisp-mode-hook 'af-tab-fix) |
20 | 20 |
21 ;; disable whitespace cleanup in modes sensitive to whitespace | 21 ;; disable whitespace cleanup in modes sensitive to whitespace |
22 (defun af-no-clean-whitespace () | 22 (defun af-no-clean-whitespace () |
23 (interactive) | |
23 (make-variable-buffer-local 'af-cleanup-whitespace) | 24 (make-variable-buffer-local 'af-cleanup-whitespace) |
24 (set-variable 'af-cleanup-whitespace nil)) | 25 (set-variable 'af-cleanup-whitespace nil)) |
25 (add-hook 'rst-mode-hook 'af-no-clean-whitespace) | 26 (add-hook 'rst-mode-hook 'af-no-clean-whitespace) |
26 (add-hook 'makefile-mode-hook 'af-no-clean-whitespace) | 27 (add-hook 'makefile-mode-hook 'af-no-clean-whitespace) |
27 | 28 |