From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Tue, 18 Aug 2020 21:23:42 +0000 (+0200)
Subject: Remove some compat code from descr-text.el
X-Git-Tag: emacs-28.0.90~6526
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=cb202551f702c7b4695bf672420e7fbb14503b69;p=emacs.git

Remove some compat code from descr-text.el

* lisp/descr-text.el (describe-text-properties-1): button.el is
pre-loaded, so remove check for it.
---

diff --git a/lisp/descr-text.el b/lisp/descr-text.el
index 55f0b7dcb40..d6da4280630 100644
--- a/lisp/descr-text.el
+++ b/lisp/descr-text.el
@@ -141,8 +141,7 @@ otherwise."
 	 (wid-field (get-char-property pos 'field))
 	 (wid-button (get-char-property pos 'button))
 	 (wid-doc (get-char-property pos 'widget-doc))
-	 ;; If button.el is not loaded, we have no buttons in the text.
-	 (button (and (fboundp 'button-at) (button-at pos)))
+	 (button (button-at pos))
 	 (button-type (and button (button-type button)))
 	 (button-label (and button (button-label button)))
 	 (widget (or wid-field wid-button wid-doc)))