Make function definition regexp only look for 'clojure.core/defn' forms

Author: Vadim Rodionov

clojure-mode.el

@@ -878,10 +878,9 @@ any number of matches of `clojure--sym-forbidden-rest-chars'."))
                 "\\(?:#?^\\(?:{[^}]*}\\|\\sw+\\)[ \r\n\t]*\\)*"
                 "\\(\\sw+\\)?")
        (2 font-lock-type-face nil t))
-      ;; Function definition (anything that starts with def and is not
-      ;; listed above)
-      (,(concat "(\\(?:" clojure--sym-regexp "/\\)?"
-                "\\(def[^ \r\n\t]*\\)"
+      ;; Function definition
+      (,(concat "(\\(?:clojure.core/\\)?"
+                "\\(defn\\)"
                 ;; Function declarations
                 "\\>"
                 ;; Any whitespace

test/clojure-mode-font-lock-test.el

@@ -780,13 +780,13 @@ DESCRIPTION is the description of the spec."
      (2 4 font-lock-type-face)
      (5 5 nil)
      (6 9 font-lock-keyword-face)
-     (11 13 font-lock-function-name-face))
+     (11 13 nil))
 
     ("(clo/defrecord foo nil)"
      (2 4 font-lock-type-face)
      (5 5 nil)
      (6 14 font-lock-keyword-face)
-     (16 18 font-lock-function-name-face))
+     (16 18 nil))
 
     ("(s/def ::keyword)"
      (2 2 font-lock-type-face)