From 1fc6e6810175ec1a3fbad7cd4f2f504d8770b776 Mon Sep 17 00:00:00 2001
From: Gerd Moellmann <gerd@gnu.org>
Date: Wed, 27 Dec 2000 14:34:32 +0000
Subject: [PATCH] (x-toolkit-scroll-bars): Check for x-toolkit-scroll-bars
 instead of x-toolkit-scroll-bars-p.

---
 lisp/scroll-bar.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/scroll-bar.el b/lisp/scroll-bar.el
index b7f2de82a6e..5c2a47877a8 100644
--- a/lisp/scroll-bar.el
+++ b/lisp/scroll-bar.el
@@ -330,7 +330,7 @@ EVENT should be a scroll bar click."
 ;;;; Bindings.
 
 ;;; For now, we'll set things up to work like xterm.
-(cond (x-toolkit-scroll-bars-p
+(cond (x-toolkit-scroll-bars
        (global-set-key [vertical-scroll-bar mouse-1]
 		       'scroll-bar-toolkit-scroll))
       (t
-- 
2.39.2