From 001f55836627675c610fc0d234c07cb81977bedb Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Thu, 7 Feb 2002 17:50:25 +0000 Subject: [PATCH] (ffap-newsgroup-p): Test for non-nil symbol-value of htb. --- lisp/ChangeLog | 4 ++++ lisp/ffap.el | 3 ++- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 6bfae3113be..0d0d3e33f59 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2002-02-07 Markus Rost + + * ffap.el (ffap-newsgroup-p): Test for non-nil symbol-value of htb. + 2002-02-07 Richard M. Stallman * terminal.el (terminal-map): Define [menu-bar] so global def is seen. diff --git a/lisp/ffap.el b/lisp/ffap.el index fcded84e402..07ffb0dbd40 100644 --- a/lisp/ffap.el +++ b/lisp/ffap.el @@ -549,7 +549,8 @@ Looks at `ffap-ftp-default-user', returns \"\" for \"localhost\"." (progn ;; errs: htb symbol may be unbound, or not a hash-table. ;; gnus-gethash is just a macro for intern-soft. - (and (intern-soft string (symbol-value htb)) + (and (symbol-value htb) + (intern-soft string (symbol-value htb)) (setq ret string htbs nil)) ;; If we made it this far, gnus is running, so ignore "heads": (setq heads nil)) -- 2.39.2