From: Richard M. Stallman <rms@gnu.org>
Date: Thu, 12 May 1994 02:14:13 +0000 (+0000)
Subject: (sdb): Handle tags-file-name as nil.
X-Git-Tag: emacs-19.34~8392
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=e290aebbf9fe01ac79e72d43013f6cf802e33694;p=emacs.git

(sdb): Handle tags-file-name as nil.
---

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)