Index: lisp/progmodes/ada-xref.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/progmodes/ada-xref.el,v
retrieving revision 1.26
diff -c -r1.26 ada-xref.el
*** lisp/progmodes/ada-xref.el	10 Feb 2006 09:00:31 -0000	1.26
--- lisp/progmodes/ada-xref.el	15 Oct 2006 09:22:19 -0000
***************
*** 1916,1923 ****
        (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")))
  	(set 'dirs (cdr dirs)))
  
        ;;  Now parse the output
--- 1916,1927 ----
        (set-buffer (get-buffer-create "*grep*"))
        (while dirs
  	(insert (shell-command-to-string
! 		 (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