Make usable again in Emacs 27 (#448)

* Remove redundant uses of 'one-or-more'

To avoid backtracking and thus improve font-locking performance.
Necessary in Emacs 27 because of some correctness improvements in 'rx'.

Suggested by Mattias Engdegård in https://debbugs.gnu.org/38104.

* Remove two more 'one-or-more' uses

They never did anything anyway because 'identifiers' doesn't include
any separators, so the resulting construct could only match one
identifier anyway.

Author: dgutov

elixir-mode.el

@@ -134,7 +134,7 @@
       ;; The first character of an identifier must be a letter or an underscore.
       ;; After that, they may contain any alphanumeric character + underscore.
       ;; Additionally, the final character may be either `?' or `!'.
-      (identifiers . ,(rx (one-or-more (any "A-Z" "a-z" "_"))
+      (identifiers . ,(rx (any "A-Z" "a-z" "_")
                           (zero-or-more (any "A-Z" "a-z" "0-9" "_"))
                           (optional (or "?" "!"))))
       (keyword . ,(rx symbol-start
@@ -151,11 +151,11 @@
       ;; or `!'.
       (module-names . ,(rx symbol-start
                            (optional (or "%" "&"))
-                           (one-or-more (any "A-Z"))
+                           (any "A-Z")
                            (zero-or-more (any "A-Z" "a-z" "_" "0-9"))
                            (zero-or-more
                             (and "."
-                                 (one-or-more (any "A-Z" "_"))
+                                 (any "A-Z" "_")
                                  (zero-or-more (any "A-Z" "a-z" "_" "0-9"))))
                            (optional (or "!" "?"))
                            symbol-end))
@@ -304,7 +304,7 @@ is used to limit the scan."
     (elixir-match-interpolation 0 font-lock-variable-name-face t)
 
     ;; Module attributes
-    (,(elixir-rx (and "@" (1+ identifiers)))
+    (,(elixir-rx (and "@" identifiers))
      0 elixir-attribute-face)
 
     ;; Keywords
@@ -399,7 +399,7 @@ is used to limit the scan."
      1 font-lock-variable-name-face)
 
     ;; Map keys
-    (,(elixir-rx (group (and (one-or-more identifiers) ":")) space)
+    (,(elixir-rx (group (and identifiers ":")) space)
      1 elixir-atom-face)
 
     ;; Pseudovariables