Path: utzoo!utgpu!watmath!uunet!tut.cis.ohio-state.edu!RELAY.NSWC.NAVY.MIL!dsill
From: dsill@RELAY.NSWC.NAVY.MIL
Newsgroups: gnu.emacs.bug
Subject: find-tag-tag in tags.el
Message-ID: <8903231938.AA04764@prep.ai.mit.edu>
Date: 23 Mar 89 20:05:11 GMT
Sender: daemon@tut.cis.ohio-state.edu
Distribution: gnu
Organization: GNUs Not Usenet
Lines: 16

GNU Emacs 18.52.3 of Tue Jan 31 1989 on ef80 (berkeley-unix)

Our $EMACS/lisp/tags.el has a find-tag-tag function.  I don't know
what the problem is, but I don't think changing calls to find-tag-tag
to find-tag will fix it.

From tags.el:
(defun find-tag-tag (string)
  (let* ((default (find-tag-default))
	 (spec (read-string
		(if default
		    (format "%s(default %s) " string default)
		  string))))
    (list (if (equal spec "")
	      default
	    spec))))