mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2024-12-11 09:20:51 +00:00
Remove duplication of find
file pattern arguments
* lisp/cedet/semantic/symref/grep.el (semantic-symref-derive-find-filepatterns): Avoid including the same pattern twice.
This commit is contained in:
parent
1b0fb8fc2e
commit
4cf6d03d04
@ -87,7 +87,7 @@ Optional argument MODE specifies the `major-mode' to test."
|
||||
(if (null (cdr pat))
|
||||
args
|
||||
`("(" ,@args
|
||||
,@(mapcan (lambda (s) `("-o" "-name" ,s)) pat)
|
||||
,@(mapcan (lambda (s) `("-o" "-name" ,s)) (cdr pat))
|
||||
")"))))))
|
||||
|
||||
(defvar semantic-symref-grep-flags)
|
||||
|
Loading…
Reference in New Issue
Block a user