summaryrefslogtreecommitdiff
path: root/lisp/url/url-news.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/url/url-news.el')
-rw-r--r--lisp/url/url-news.el7
1 files changed, 1 insertions, 6 deletions
diff --git a/lisp/url/url-news.el b/lisp/url/url-news.el
index 585a28291ae..4fe909cadbc 100644
--- a/lisp/url/url-news.el
+++ b/lisp/url/url-news.el
@@ -27,11 +27,6 @@
(require 'nntp)
(autoload 'gnus-group-read-ephemeral-group "gnus-group")
-;; Unused.
-;;; (defgroup url-news nil
-;;; "News related options."
-;;; :group 'url)
-
(defun url-news-open-host (host port user pass)
(if (fboundp 'nnheader-init-server-buffer)
(nnheader-init-server-buffer))
@@ -111,7 +106,7 @@
(article (url-unhex-string (url-filename url))))
(url-news-open-host host port (url-user url) (url-password url))
(cond
- ((string-match "@" article) ; Its a specific article
+ ((string-search "@" article) ; Its a specific article
(setq buf (url-news-fetch-message-id host article)))
((string= article "") ; List all newsgroups
(gnus))