Remove gnudoit support from browse-url.el

* lisp/net/browse-url.el (browse-url-gnudoit-program)
(browse-url-gnudoit-args, browse-url-w3-gnudoit): Remove support
for gnudoit, obsolete since Emacs 25.1.
This commit is contained in:
Stefan Kangas 2025-01-03 04:08:44 +01:00
parent 004a48b3d4
commit 597161fe1e
2 changed files with 4 additions and 32 deletions

View file

@ -327,12 +327,6 @@ a web browser to load them. For example, it could be used like this:
For better integration with the Qutebrowser, set
'browse-url(-secondary)-browser-function' to 'browse-url-qutebrowser'.
*** Support for the Conkeror web browser has been removed.
It has been obsolete since Emacs 28.1.
*** Support for gnome-moz-remote has been removed.
It has been obsolete since Emacs 25.1.
*** New GTK-native launch mode
For better Wayland support, the pgtk toolkit exposes a new
'x-gtk-launch-uri' browse-url handler and uses it by default when URLs
@ -340,6 +334,10 @@ are browsed from a PGTK frame. For other frames, we fall back to the
default URL launch function. This change allows us to properly raise
browser windows under Wayland using the xdg_activation_v1 protocol.
*** Removed support for some obsolete web browsers.
Conkeror (obsolete since Emacs 28.1), gnome-moz-remote (obsolete since
Emacs 25.1), and gnudoit (obsolete since Emacs 25.1).
** CL-Lib
+++

View file

@ -467,17 +467,6 @@ This might, for instance, be a separate color version of xterm."
These might set its size, for instance."
:type '(repeat (string :tag "Argument")))
(defcustom browse-url-gnudoit-program "gnudoit"
"The name of the `gnudoit' program used by `browse-url-w3-gnudoit'."
:type 'string)
(make-obsolete-variable 'browse-url-gnudoit-program nil "29.1")
(defcustom browse-url-gnudoit-args '("-q")
"A list of strings defining options for `browse-url-gnudoit-program'.
These might set the port, for instance."
:type '(repeat (string :tag "Argument")))
(make-obsolete-variable 'browse-url-gnudoit-args nil "29.1")
(defcustom browse-url-generic-program nil
"The name of the browser program used by `browse-url-generic'."
:type '(choice string (const :tag "None" nil)))
@ -1503,21 +1492,6 @@ used instead of `browse-url-new-window-flag'."
(function-put 'browse-url-w3 'browse-url-browser-kind 'internal)
;;;###autoload
(defun browse-url-w3-gnudoit (url &optional _new-window)
"Ask another Emacs running emacsclient to load the URL using the W3 browser.
The `browse-url-gnudoit-program' program is used with options given by
`browse-url-gnudoit-args'. Default to the URL around or before point."
(declare (obsolete nil "25.1"))
(interactive (browse-url-interactive-arg "W3 URL: "))
(apply #'start-process (concat "gnudoit:" url) nil
browse-url-gnudoit-program
(append browse-url-gnudoit-args
(list (concat "(w3-fetch \"" url "\")")
"(raise-frame)"))))
(function-put 'browse-url-w3-gnudoit 'browse-url-browser-kind 'internal)
;; --- Lynx in an xterm ---
;;;###autoload