diff options
author | Juri Linkov <juri@jurta.org> | 2010-07-03 01:35:09 +0300 |
---|---|---|
committer | Juri Linkov <juri@jurta.org> | 2010-07-03 01:35:09 +0300 |
commit | a6ed0e289873ac982d7a9b0215d17a4626375b43 (patch) | |
tree | 909bdb1b646c79871e6f8c41b4c27a7426969ad3 /lisp/autoinsert.el | |
parent | c91e692bdff3f5c7e68a538f02b293d1487188b4 (diff) | |
download | emacs-a6ed0e289873ac982d7a9b0215d17a4626375b43.tar.gz |
* lisp/autoinsert.el (auto-insert-alist): Fix readability
by using dotted pair notation for lambda.
Diffstat (limited to 'lisp/autoinsert.el')
-rw-r--r-- | lisp/autoinsert.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/autoinsert.el b/lisp/autoinsert.el index b3a594d31d4..9a8001875e0 100644 --- a/lisp/autoinsert.el +++ b/lisp/autoinsert.el @@ -126,10 +126,10 @@ If this contains a %s, that will be replaced by the matching rule." _ "\n\\begin{document}\n" _ "\n\\end{document}") - (("/bin/.*[^/]\\'" . "Shell-Script mode magic number") - lambda () + (("/bin/.*[^/]\\'" . "Shell-Script mode magic number") . + (lambda () (if (eq major-mode (default-value 'major-mode)) - (sh-mode))) + (sh-mode)))) (ada-mode . ada-header) |