# HG changeset patch
# User Juri Linkov <juri@jurta.org>
# Date 1278110109 -10800
# Node ID 25749a68f5ae1af89f7dd5433226cec2996b06f4
# Parent  d5e4b1b3498834c45df1774cbe324260d745603c
* lisp/autoinsert.el (auto-insert-alist): Fix readability
by using dotted pair notation for lambda.

diff -r d5e4b1b34988 -r 25749a68f5ae lisp/ChangeLog
--- a/lisp/ChangeLog	Sat Jul 03 01:28:52 2010 +0300
+++ b/lisp/ChangeLog	Sat Jul 03 01:35:09 2010 +0300
@@ -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 -r d5e4b1b34988 -r 25749a68f5ae lisp/autoinsert.el
--- a/lisp/autoinsert.el	Sat Jul 03 01:28:52 2010 +0300
+++ b/lisp/autoinsert.el	Sat Jul 03 01:35:09 2010 +0300
@@ -126,10 +126,10 @@
      _ "\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)