bug#36512: [PATCH] Remove leftover XEmacs compat code from goto-addr.el

bug#36512: [PATCH] Remove leftover XEmacs compat code from goto-addr.el

[Stefan Kangas]

[-- Attachment #1: Type: text/plain, Size: 160 bytes --]

In commit dee0ed52, XEmacs compat code was removed from goto-addr.el.

The attached patch removes some leftover lines to finish the job.

Thanks,
Stefan Kangas

[-- Attachment #2: 0001-lisp-net-goto-addr.el-Remove-leftover-XEmacs-compat-.patch --]
[-- Type: text/x-patch, Size: 1054 bytes --]

From 7ee1a2aa0b19486c86d75bdd9302ae48905c2c8a Mon Sep 17 00:00:00 2001
From: Stefan Kangas <stefankangas@gmail.com>
Date: Fri, 5 Jul 2019 16:29:32 +0200
Subject: [PATCH] * lisp/net/goto-addr.el: Remove leftover XEmacs compat code.

---
 lisp/net/goto-addr.el | 10 ----------
 1 file changed, 10 deletions(-)

diff --git a/lisp/net/goto-addr.el b/lisp/net/goto-addr.el
index eaa1356955..40a067e625 100644
--- a/lisp/net/goto-addr.el
+++ b/lisp/net/goto-addr.el
@@ -63,16 +63,6 @@
 (require 'thingatpt)
 (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
   "Click to browse URL or to send to e-mail address."
   :group 'mouse
-- 
2.11.0

bug#36512: [PATCH] Remove leftover XEmacs compat code from goto-addr.el

[Eli Zaretskii]

> From: Stefan Kangas <stefan@marxist.se>
> Date: Fri, 5 Jul 2019 16:37:10 +0200
> 
> In commit dee0ed52, XEmacs compat code was removed from goto-addr.el.
> 
> The attached patch removes some leftover lines to finish the job.

Thanks, pushed.