Tweak `browse-url-add-buttons' for better button.el comp

* lisp/net/browse-url.el (browse-url-add-buttons): Make browse-url buttons be understood by `forward-button' and the like.
2019-07-30 16:06:51 +02:00
parent 8bd6245e56
commit 08953259b9
1 changed files with 1 additions and 0 deletions
--- a/lisp/net/browse-url.el
+++ b/lisp/net/browse-url.el
@@ -1675,6 +1675,7 @@ clickable and will use `browse-url' to open the URLs in question."
                                         keymap ,browse-url-button-map
                                         face browse-url-button
                                         button t
+                                         category browse-url
                                         browse-url-data ,(match-string 0)))))))

 (defun browse-url-button-open (&optional external mouse-event)