diff options
| author | Mattias Engdegård <mattiase@acm.org> | 2021-09-19 09:29:33 +0200 |
|---|---|---|
| committer | Mattias Engdegård <mattiase@acm.org> | 2021-09-19 09:33:21 +0200 |
| commit | 7880d3079d0de5844b519652d7a54adf98f658e1 (patch) | |
| tree | 88eb4dfd3780e659a26c2dfbabaa391277914f08 /lisp/cedet/semantic/symref | |
| parent | bc59c98f096f7d01cbccf98d4fdd9c3f0385e896 (diff) | |
| download | emacs-7880d3079d0de5844b519652d7a54adf98f658e1.tar.gz emacs-7880d3079d0de5844b519652d7a54adf98f658e1.tar.bz2 emacs-7880d3079d0de5844b519652d7a54adf98f658e1.zip | |
; * lisp/cedet/semantic/symref/grep.el: Use grep quoting, not egrep.
Kindly noticed by Dmitry Gutov.
Diffstat (limited to 'lisp/cedet/semantic/symref')
| -rw-r--r-- | lisp/cedet/semantic/symref/grep.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/cedet/semantic/symref/grep.el b/lisp/cedet/semantic/symref/grep.el index 1e282c3052c..077a2d48615 100644 --- a/lisp/cedet/semantic/symref/grep.el +++ b/lisp/cedet/semantic/symref/grep.el @@ -133,9 +133,9 @@ This shell should support pipe redirect syntax." :group 'semantic :type 'string) -(defun semantic-symref-grep--quote-extended (string) - "Quote STRING as an extended-syntax regexp." - (replace-regexp-in-string (rx (in ".^$*+?|{}[]()|\\")) +(defun semantic-symref-grep--quote-grep (string) + "Quote STRING as a grep-syntax regexp." + (replace-regexp-in-string (rx (in ".^$*[\\")) (lambda (s) (concat "\\" s)) string nil t)) @@ -160,7 +160,7 @@ This shell should support pipe redirect syntax." (searchfor (oref tool searchfor)) (greppat (if (eq (oref tool searchtype) 'regexp) searchfor - (semantic-symref-grep--quote-extended searchfor))) + (semantic-symref-grep--quote-grep searchfor))) ;; Misc (b (get-buffer-create "*Semantic SymRef*")) (ans nil) |