summaryrefslogtreecommitdiff
path: root/lisp/cedet/semantic/symref/grep.el
diff options
context:
space:
mode:
authorDmitry Gutov <dgutov@yandex.ru>2015-05-10 20:43:54 +0300
committerDmitry Gutov <dgutov@yandex.ru>2015-05-10 20:45:38 +0300
commitec13f4b344fc8f840647209137e29be470143969 (patch)
treedf955e8ae631a4d49888646e0b4417e6fa3e3da8 /lisp/cedet/semantic/symref/grep.el
parentf37d86ed0bd0857cfb5c606e9d5b5611d02783aa (diff)
downloademacs-ec13f4b344fc8f840647209137e29be470143969.tar.gz
semantic/symref/grep: Don't use word boundaries
* lisp/cedet/semantic/symref/grep.el (semantic-symref-perform-search): Instead of wrapping input in word boundaries, check that the characters before and after are not word constituents.
Diffstat (limited to 'lisp/cedet/semantic/symref/grep.el')
-rw-r--r--lisp/cedet/semantic/symref/grep.el6
1 files changed, 5 insertions, 1 deletions
diff --git a/lisp/cedet/semantic/symref/grep.el b/lisp/cedet/semantic/symref/grep.el
index 3cf841e4f2c..6325eb4a396 100644
--- a/lisp/cedet/semantic/symref/grep.el
+++ b/lisp/cedet/semantic/symref/grep.el
@@ -158,7 +158,11 @@ This shell should support pipe redirect syntax."
(cond ((eq (oref tool :searchtype) 'regexp)
(oref tool searchfor))
(t
- (concat "\\<" (oref tool searchfor) "\\>")))))
+ ;; Can't use the word boundaries: Grep
+ ;; doesn't always agrees with the language
+ ;; syntax on those.
+ (format "\\(^\\|\\W\\)%s\\(\\W\\|$\\)"
+ (oref tool searchfor))))))
;; Misc
(b (get-buffer-create "*Semantic SymRef*"))
(ans nil)