Commit c0d1a228 authored by Stefan Kangas's avatar Stefan Kangas Committed by Eli Zaretskii

* lisp/net/goto-addr.el: Remove leftover XEmacs compat code. (Bug#36512)

parent 43d2a0a4
Pipeline #2260 failed with stage
in 90 minutes and 2 seconds
...@@ -63,16 +63,6 @@ ...@@ -63,16 +63,6 @@
(require 'thingatpt) (require 'thingatpt)
(autoload 'browse-url-url-at-point "browse-url") (autoload 'browse-url-url-at-point "browse-url")
;; XEmacs needs the following definitions.
(unless (fboundp 'overlays-in)
(require 'overlay))
(unless (fboundp 'line-beginning-position)
(defalias 'line-beginning-position 'point-at-bol))
(unless (fboundp 'line-end-position)
(defalias 'line-end-position 'point-at-eol))
(unless (fboundp 'match-string-no-properties)
(defalias 'match-string-no-properties 'match-string))
(defgroup goto-address nil (defgroup goto-address nil
"Click to browse URL or to send to e-mail address." "Click to browse URL or to send to e-mail address."
:group 'mouse :group 'mouse
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment