Re: Finding files with tags

[Kevin Rodgers <ihs_4664@yahoo.com>]

mlathe wrote:
> Is it possible get a listing of all the filenames that match a grep on TAGS?
> Ideally you wouldn't need to cycle through the list but rather you would
> simply get a listing in a buffer similar to dired or grep-find (no sure
> about the exact term) that actually open the buffer.
> 
> Currently i use an index that i created using find, and some various tools i
> wrote to do greps on that list. However i need to do this in the emacs
> shell, then copy it into the find-file. Its not exactly ideal.

Here's what I came up with (note the literal DEL character immediately
after the first comma in the sed regex):

(defun dired-tags-table (tags)
   "Use Dired mode to edit the files listed in the TAGS table."
   ;; (interactive ...) copied from visit-tags-table:
   (interactive (list (read-file-name "Dired tags table: (default TAGS) "
				     default-directory
				     (expand-file-name "TAGS"
						       default-directory)
				     t)))
   (dired (cons (file-name-directory tags)
                (split-string
                 (shell-command-to-string
                  (format "sed -n 's/^\\([^,\x7f]*\\),[1-9][0-9]*$/\\1/p' %s"
                          tags))))))


-- 
Kevin Rodgers