diff options
author | Lars Ingebrigtsen <larsi@gnus.org> | 2018-04-14 20:32:05 +0200 |
---|---|---|
committer | Lars Ingebrigtsen <larsi@gnus.org> | 2018-04-14 20:32:05 +0200 |
commit | 5b535761f616f01277111cfbb9c635e7a417afad (patch) | |
tree | 54f56d0e1aefaa66e69ad14f5a329e7e59498dbf /lisp/erc/erc-button.el | |
parent | cdefc045893a7fed57856ac385ab41c71f61c09f (diff) | |
download | emacs-5b535761f616f01277111cfbb9c635e7a417afad.tar.gz |
Rename url-button-google-url
* lisp/erc/erc-button.el (erc-button-search-url): Renamed from
url-button-google-url (bug#25717). Suggested by Andrew Robbins.
(erc-button-alist): Use it.
Diffstat (limited to 'lisp/erc/erc-button.el')
-rw-r--r-- | lisp/erc/erc-button.el | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/lisp/erc/erc-button.el b/lisp/erc/erc-button.el index 8269e5c1634..8e1be30f352 100644 --- a/lisp/erc/erc-button.el +++ b/lisp/erc/erc-button.el @@ -121,12 +121,16 @@ longer than `erc-fill-column'." :group 'erc-button :type 'string) -(defcustom erc-button-google-url "http://www.google.com/search?q=%s" +(defcustom erc-button-search-url "http://duckduckgo.com/?q=%s" "URL used to browse Google search references. %s is replaced by the search string." + :version "27.1" :group 'erc-button :type 'string) +(define-obsolete-variable-alias 'erc-button-google-url + 'erc-button-search-url "27.1") + (defcustom erc-button-alist ;; Since the callback is only executed when the user is clicking on ;; a button, it makes no sense to optimize performance by @@ -148,7 +152,7 @@ longer than `erc-fill-column'." ("Lisp:\\([a-zA-Z.+-]+\\)" 0 t erc-browse-emacswiki-lisp 1) ("\\bGoogle:\\([^ \t\n\r\f]+\\)" 0 t (lambda (keywords) - (browse-url (format erc-button-google-url keywords))) + (browse-url (format erc-button-search-url keywords))) 1) ("\\brfc[#: ]?\\([0-9]+\\)" 0 t (lambda (num) |