[Emacs-diffs] trunk r116899: * lisp/url/url-vars.el (url-bug-address): Make into an obsolete alias.

[Glenn Morris]

------------------------------------------------------------
revno: 116899
revision-id: address@hidden
parent: address@hidden
committer: Glenn Morris <address@hidden>
branch nick: trunk
timestamp: Fri 2014-03-28 19:02:02 -0400
message:
  * 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.
modified:
  lisp/url/ChangeLog             changelog-20091113204419-o5vbwnq5f7feedwu-3116
  lisp/url/url-http.el           urlhttp.el-20091113204419-o5vbwnq5f7feedwu-2989
  lisp/url/url-news.el           urlnews.el-20091113204419-o5vbwnq5f7feedwu-2997
  lisp/url/url-vars.el           urlvars.el-20091113204419-o5vbwnq5f7feedwu-3004

=== modified file 'lisp/url/ChangeLog'
--- a/lisp/url/ChangeLog        2014-03-26 15:21:17 +0000
+++ b/lisp/url/ChangeLog        2014-03-28 23:02:02 +0000
@@ -1,3 +1,10 @@
+2014-03-28  Glenn Morris  <address@hidden>
+
+       * 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  <address@hidden>
 
        * url-handlers.el (url-http-parse-response): Add autoload.

=== modified file 'lisp/url/url-http.el'
--- a/lisp/url/url-http.el      2014-01-08 18:29:16 +0000
+++ b/lisp/url/url-http.el      2014-03-28 23:02:02 +0000
@@ -414,7 +414,7 @@
          (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?

=== modified file 'lisp/url/url-news.el'
--- a/lisp/url/url-news.el      2014-01-01 07:43:34 +0000
+++ b/lisp/url/url-news.el      2014-03-28 23:02:02 +0000
@@ -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"

=== modified file 'lisp/url/url-vars.el'
--- a/lisp/url/url-vars.el      2014-01-25 19:15:42 +0000
+++ b/lisp/url/url-vars.el      2014-03-28 23:02:02 +0000
@@ -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 @@
   :type 'boolean
   :group 'url-cache)
 
-(defconst url-bug-address "address@hidden"
-  "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.