Merge pull request #176 from rranelli/fix-#172

Highlight digits in atoms

Author: mattdeboard

elixir-mode.el

@@ -185,7 +185,9 @@ for the Elixir programming language."
     `(
       (atoms . ,(rx ":"
                     (or
-                     (one-or-more (any "a-z" "A-Z" "_" "\"" "'"))
+                     (and
+                      (any "a-z" "A-Z" "_" "\"" "'")
+                      (zero-or-more (any "a-z" "A-Z" "0-9" "_" "\"" "'")))
                      (and "\"" (one-or-more (not (any "\""))) "\"")
                      (and "'" (one-or-more (not (any "'"))) "'"))))
       (builtin . ,(rx symbol-start

test/elixir-mode-font-test.el

@@ -124,11 +124,14 @@ end"
   :tags '(fontification atom syntax-table)
   (elixir-test-with-temp-buffer
       ":oriole
-:andale"
+:andale
+:ms2pid"
     (should (eq (elixir-test-face-at 3) 'elixir-atom-face))
     (should (eq (elixir-test-face-at 5) 'elixir-atom-face))
     (should (eq (elixir-test-face-at 10) 'elixir-atom-face))
-    (should (eq (elixir-test-face-at 13) 'elixir-atom-face))))
+    (should (eq (elixir-test-face-at 13) 'elixir-atom-face))
+    (should (eq (elixir-test-face-at 18) 'elixir-atom-face))
+    (should (eq (elixir-test-face-at 23) 'elixir-atom-face))))
 
 (ert-deftest elixir-mode-syntax-table/fontify-map-keys ()
   :tags '(fontification map syntax-table)