Mercurial > emacs
changeset 7461:1ce5d720b347
(sdb): Handle tags-file-name as nil.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Thu, 12 May 1994 02:14:13 +0000 |
parents | dc5c72c57c70 |
children | 2ead438fa63a |
files | lisp/gud.el |
diffstat | 1 files changed, 3 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/gud.el Wed May 11 22:15:20 1994 +0000 +++ b/lisp/gud.el Thu May 12 02:14:13 1994 +0000 @@ -404,7 +404,9 @@ nil nil '(gud-sdb-history . 1)))) (if (and gud-sdb-needs-tags - (not (and (boundp 'tags-file-name) (file-exists-p tags-file-name)))) + (not (and (boundp 'tags-file-name) + (stringp tags-file-name) + (file-exists-p tags-file-name)))) (error "The sdb support requires a valid tags table to work.")) (gud-overload-functions '((gud-massage-args . gud-sdb-massage-args) (gud-marker-filter . gud-sdb-marker-filter)