summaryrefslogtreecommitdiff
path: root/lisp/ffap.el
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>2002-02-07 17:50:25 +0000
committerRichard M. Stallman <rms@gnu.org>2002-02-07 17:50:25 +0000
commit001f55836627675c610fc0d234c07cb81977bedb (patch)
treecfa48ecb2afceb88993f3dd5bba5b30b02413394 /lisp/ffap.el
parenta1970a1d1d24d723abd0cd63580b5dc3a312a8e1 (diff)
downloademacs-001f55836627675c610fc0d234c07cb81977bedb.tar.gz
(ffap-newsgroup-p): Test for non-nil symbol-value of htb.
Diffstat (limited to 'lisp/ffap.el')
-rw-r--r--lisp/ffap.el3
1 files changed, 2 insertions, 1 deletions
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))