2006-10-15 Lennart Borgman <lennart.borgman.073@student.lu.se>

(ada-find-in-src-path): Use shell-quote-argument.
Use grep -E rather than egrep.

1 files changed, 6 insertions, 2 deletions

diff --git a/lisp/progmodes/ada-xref.el b/lisp/progmodes/ada-xref.el
index 9e3f8e14332..05d2a8bf65b 100644
--- a/lisp/progmodes/ada-xref.el
+++ b/lisp/progmodes/ada-xref.el
@@ -1916,8 +1916,12 @@ is using."
       (set-buffer (get-buffer-create "*grep*"))
       (while dirs
         (insert (shell-command-to-string
-                 (concat "egrep -i -h '^X|" regexp "( |$)' "
-                         (file-name-as-directory (car dirs)) "*.ali")))
+                 (concat
+                  "grep -E -i -h "
+                  (shell-quote-argument (concat "^X|" regexp "( |$)"))
+                  " "
+                  (shell-quote-argument (file-name-as-directory (car dirs)))
+                  "*.ali")))
         (set 'dirs (cdr dirs)))
 
       ;;  Now parse the output