Mercurial > emacs

changeset 65401:27b65d33884f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(all): Don't complain about fringe-related built-ins if fringes are not supported. Ditto about selection-related built-ins. Fix the test for GTK-related built-ins.
author Eli Zaretskii <eliz@gnu.org>
date Fri, 09 Sep 2005 16:21:23 +0000
parents 5888f8ee2138
children 873aa2fb049c
files lisp/cus-start.el
diffstat 1 files changed, 7 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/cus-start.el	Fri Sep 09 13:42:01 2005 +0000
+++ b/lisp/cus-start.el	Fri Sep 09 16:21:23 2005 +0000
@@ -366,9 +366,15 @@
 		      ((string-match "\\`w32-" (symbol-name symbol))
 		       (eq system-type 'windows-nt))
 		      ((string-match "\\`x-.*gtk" (symbol-name symbol))
-		       (or (boundp 'gtk) (not (eq system-type 'windows-nt))))
+		       (or (boundp 'gtk)
+			   (and (display-graphic-p)
+				(not (eq system-type 'windows-nt)))))
 		      ((string-match "\\`x-" (symbol-name symbol))
 		       (fboundp 'x-create-frame))
+		      ((string-match "selection" (symbol-name symbol))
+		       (fboundp 'x-selection-exists-p))
+		      ((string-match "fringe" (symbol-name symbol))
+		       (fboundp 'define-fringe-bitmap))
 		      (t t))))
     (if (not (boundp symbol))
 	;; If variables are removed from C code, give an error here!