From e290aebbf9fe01ac79e72d43013f6cf802e33694 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Thu, 12 May 1994 02:14:13 +0000 Subject: [PATCH] (sdb): Handle tags-file-name as nil. --- lisp/gud.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/lisp/gud.el b/lisp/gud.el index 594f88a4f2c..421bb15b337 100644 --- a/lisp/gud.el +++ b/lisp/gud.el @@ -404,7 +404,9 @@ and source-file directory for your debugger." 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) -- 2.39.5