comparison lisp/cus-start.el @ 83366:5a8e49e5b281

Fix bootstrap error. * lisp/cus-start.el: Remove bogus window-system reference from GTK test. git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-406
author Karoly Lorentey <lorentey@elte.hu>
date Sat, 10 Sep 2005 23:00:15 +0000
parents 4b9f048f9a7e
children 08b4dd6a6e87
comparison
equal deleted inserted replaced
83365:98c880698d66 83366:5a8e49e5b281
364 ((string-match "\\`dos-" (symbol-name symbol)) 364 ((string-match "\\`dos-" (symbol-name symbol))
365 (eq system-type 'ms-dos)) 365 (eq system-type 'ms-dos))
366 ((string-match "\\`w32-" (symbol-name symbol)) 366 ((string-match "\\`w32-" (symbol-name symbol))
367 (eq system-type 'windows-nt)) 367 (eq system-type 'windows-nt))
368 ((string-match "\\`x-.*gtk" (symbol-name symbol)) 368 ((string-match "\\`x-.*gtk" (symbol-name symbol))
369 (or (boundp 'gtk) 369 (featurep 'gtk))
370 (and window-system
371 (not (eq window-system 'pc))
372 (not (eq system-type 'windows-nt)))))
373 ((string-match "\\`x-" (symbol-name symbol)) 370 ((string-match "\\`x-" (symbol-name symbol))
374 (fboundp 'x-create-frame)) 371 (fboundp 'x-create-frame))
375 ((string-match "selection" (symbol-name symbol)) 372 ((string-match "selection" (symbol-name symbol))
376 (fboundp 'x-selection-exists-p)) 373 (fboundp 'x-selection-exists-p))
377 ((string-match "fringe" (symbol-name symbol)) 374 ((string-match "fringe" (symbol-name symbol))