diff options
| author | Daniel Mendler <mail@daniel-mendler.de> | 2024-02-15 13:51:08 +0100 |
|---|---|---|
| committer | Daniel Mendler <mail@daniel-mendler.de> | 2024-02-15 13:51:08 +0100 |
| commit | 40f75b6bdf1574b1d50d04a482c529050ed37d2e (patch) | |
| tree | c78bce533b2f6e75478723126ff81877e60d03a4 | |
| parent | 674a1c75d5861b36de29b2fa1957146a3ee34163 (diff) | |
orderless-literal: Use (literal string) instead of regexp-quote
| -rw-r--r-- | orderless.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/orderless.el b/orderless.el index 97a9cd5..de53463 100644 --- a/orderless.el +++ b/orderless.el @@ -216,9 +216,9 @@ is determined by the values of `completion-ignore-case', (progn (string-match-p component "") component) (invalid-regexp nil))) -(defalias 'orderless-literal #'regexp-quote - "Match a component as a literal string. -This is simply `regexp-quote'.") +(defun orderless-literal (component) + "Match COMPONENT as a literal string." + `(literal ,component)) (defun orderless--separated-by (sep rxs &optional before after) "Return a regexp to match the rx-regexps RXS with SEP in between. |