* progmodes/scheme.el: Add indentation and font-locking for λ.

Fixes: debbugs:13975

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 71460a3d7a7b0706b58e0f7f89b5886ccae37372..8102cb56a9747e903f221950714695f8b218dd6e 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2013-03-16  Leo Liu  <sdl.web@gmail.com>
+
+       * progmodes/scheme.el: Add indentation and font-locking for λ.
+       (Bug#13975)
+
 2013-03-14  Stefan Monnier  <monnier@iro.umontreal.ca>
 
        * emacs-lisp/smie.el (smie-auto-fill): Don't inf-loop if there's no

diff --git a/lisp/progmodes/scheme.el b/lisp/progmodes/scheme.el
index a7dbc41162209ac9f1ef30300efdfc3445c3dcac..01f0988f08ffedda3892e4fe3bf8b5db2d41a295 100644 (file)
--- a/lisp/progmodes/scheme.el
+++ b/lisp/progmodes/scheme.el
@@ -310,7 +310,7 @@ See `run-hooks'."
        "(" (regexp-opt
             '("begin" "call-with-current-continuation" "call/cc"
               "call-with-input-file" "call-with-output-file" "case" "cond"
-              "do" "else" "for-each" "if" "lambda"
+              "do" "else" "for-each" "if" "lambda" "λ"
               "let" "let*" "let-syntax" "letrec" "letrec-syntax"
               ;; SRFI 11 usage comes up often enough.
               "let-values" "let*-values"
@@ -410,6 +410,7 @@ that variable's value is a string."
 (put 'make 'scheme-indent-function 1)
 (put 'style 'scheme-indent-function 1)
 (put 'root 'scheme-indent-function 1)
+(put 'λ 'scheme-indent-function 1)
 
 (defvar dsssl-font-lock-keywords
   (eval-when-compile