From: Po Lu <luangruo@yahoo.com>
Date: Mon, 29 Nov 2021 09:19:27 +0000 (+0800)
Subject: Fix last change for non-X platforms
X-Git-Tag: emacs-29.0.90~3649^2~2
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=4320180111422ad803f26a30e616f1f18efedb65;p=emacs.git

Fix last change for non-X platforms

* lisp/cus-start.el: Don't announce
`scroll-bar-adjust-thumb-portion' on non-X systems.
---

diff --git a/lisp/cus-start.el b/lisp/cus-start.el
index e895ebd5692..45b81e5bc5f 100644
--- a/lisp/cus-start.el
+++ b/lisp/cus-start.el
@@ -877,8 +877,10 @@ since it could result in memory overflow and make Emacs crash."
 			      (symbol-name symbol))
 		       ;; Any function from fontset.c will do.
 		       (fboundp 'new-fontset))
-		      ((equal "scroll-bar-adjust-thumb-portion"
-			      (symbol-name symbol))
+		      ((or (equal "scroll-bar-adjust-thumb-portion"
+			          (symbol-name symbol))
+                           (equal "x-scroll-event-delta-factor"
+                                  (symbol-name symbol)))
 		       (featurep 'x))
 		      (t t))))
     (if (not (boundp symbol))