Font-lock as-> as a keyword

Author: Bozhidar Batsov

clojure-mode.el

@@ -408,7 +408,7 @@ Called by `imenu--generic-function'."
           '("letfn" "case" "cond" "cond->" "cond->>" "condp"
             "for" "when" "when-not" "when-let" "when-first" "when-some"
             "if-let" "if-not" "if-some"
-            ".." "->" "->>" "doto" "and" "or"
+            ".." "->" "->>" "as->" "doto" "and" "or"
             "dosync" "doseq" "dotimes" "dorun" "doall"
             "load" "import" "unimport" "ns" "in-ns" "refer"
             "with-open" "with-local-vars" "binding"