eww: Fallback on -suggested-uris in -browse-with-external-browser

.emacs.d/lisp/init-eww.el

@@ -117,6 +117,17 @@ word(s) will be searched for via `eww-search-prefix'."
                 (list url nil (current-buffer))))
 (advice-add 'eww :override 'ambrevar/eww)
 
+(defun ambrevar/eww-browse-with-external-browser (&optional url)
+  "Browse the current URL with an external browser.
+The browser to used is specified by the `shr-external-browser' variable."
+  (interactive)
+  (funcall shr-external-browser (or url
+                                    (car (eww-suggested-uris))
+                                    (plist-get eww-data :url))))
+(advice-add 'eww-browse-with-external-browser
+            :override
+            'ambrevar/eww-browse-with-external-browser)
+
 (defun ambrevar/eww-open-in-new-buffer (url)
   "Fetch URL and render the page.
 If the input doesn't look like an URL or a domain name, the