* lisp/url/url-vars.el (url-bug-address): Make into an obsolete alias.

* lisp/urlurl-http.el (url-http-handle-authentication):
* lisp/url/url-news.el (url-news-fetch-message-id):
Use M-x report-emacs-bug in help messages.

diff --git a/lisp/url/ChangeLog b/lisp/url/ChangeLog
index cb37b45..bb7025b 100644 (file)
--- a/lisp/url/ChangeLog
+++ b/lisp/url/ChangeLog
@@ -1,3 +1,10 @@
+2014-03-28  Glenn Morris  <rgm@gnu.org>
+
+       * url-vars.el (url-bug-address): Make into an obsolete alias.
+       * url-http.el (url-http-handle-authentication):
+       * url-news.el (url-news-fetch-message-id):
+       Use M-x report-emacs-bug in help messages.
+
 2014-03-26  Juanma Barranquero  <lekktu@gmail.com>
 
        * url-handlers.el (url-http-parse-response): Add autoload.

diff --git a/lisp/url/url-http.el b/lisp/url/url-http.el
index ac2e140..85ced11 100644 (file)
--- a/lisp/url/url-http.el
+++ b/lisp/url/url-http.el
@@ -414,7 +414,7 @@ Return the number of characters removed."
          (goto-char (point-max))
          (insert "<hr>Sorry, but I do not know how to handle " type
                  " authentication.  If you'd like to write it,"
-                 " send it to " url-bug-address ".<hr>")
+                 " please use M-x report-emacs-bug RET.<hr>")
           ;; We used to set a `status' var (declared "special") but I can't
           ;; find the corresponding let-binding, so it's probably an error.
           ;; FIXME: Maybe it was supposed to set `success', i.e. to return t?

diff --git a/lisp/url/url-news.el b/lisp/url/url-news.el
index 105fb67..0ce6d2e 100644 (file)
--- a/lisp/url/url-news.el
+++ b/lisp/url/url-news.el
@@ -70,8 +70,7 @@
                "    </xmp>\n"
                "   </p>\n"
                "   <p>\n"
-               "    If you If you feel this is an error, <a href=\""
-               "mailto:" url-bug-address "\">send mail</a>\n"
+               "    If you feel this is an error, M-x report-emacs-bug RET.\n"
                "   </p>\n"
                "  </div>\n"
                " </body>\n"

diff --git a/lisp/url/url-vars.el b/lisp/url/url-vars.el
index 4cdb59d..62b7b85 100644 (file)
--- a/lisp/url/url-vars.el
+++ b/lisp/url/url-vars.el
@@ -1,7 +1,6 @@
 ;;; url-vars.el --- Variables for Uniform Resource Locator tool
 
-;; Copyright (C) 1996-1999, 2001, 2004-2014 Free Software Foundation,
-;; Inc.
+;; Copyright (C) 1996-1999, 2001, 2004-2014 Free Software Foundation, Inc.
 
 ;; Keywords: comm, data, processes, hypermedia
 
@@ -82,8 +81,8 @@ If non-nil and not t, the user will be asked for each refresh request."
   :type 'boolean
   :group 'url-cache)
 
-(defconst url-bug-address "bug-gnu-emacs@gnu.org"
-  "Where to send bug reports.")
+(define-obsolete-variable-alias 'url-bug-address
+  'report-emacs-bug-address "24.5")
 
 (defcustom url-personal-mail-address nil
   "Your full email address.