From: Juri Linkov <juri@jurta.org>
Date: Fri, 2 Jul 2010 22:35:09 +0000 (+0300)
Subject: * lisp/autoinsert.el (auto-insert-alist): Fix readability
X-Git-Tag: emacs-pretest-24.0.90~104^2~275^2~438^2~51^2~81^2~59
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a6ed0e289873ac982d7a9b0215d17a4626375b43;p=emacs.git

* lisp/autoinsert.el (auto-insert-alist): Fix readability
by using dotted pair notation for lambda.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index de4671ec509..98ea609aa82 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2010-07-02  Juri Linkov  <juri@jurta.org>
+
+	* autoinsert.el (auto-insert-alist): Fix readability
+	by using dotted pair notation for lambda.
+
 2010-07-02  Juri Linkov  <juri@jurta.org>
 
 	* faces.el (read-face-name): Rename arg `string-describing-default'
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)