Show
Ignore:
Timestamp:
09/10/05 10:16:00 (3 years ago)
Author:
miyoshi
Message:

--

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved
  • trunk/lisp/cus-start.el

    r3809 r3863  
    367367                       (eq system-type 'windows-nt)) 
    368368                      ((string-match "\\`x-.*gtk" (symbol-name symbol)) 
    369                        (or (boundp 'gtk) (not (eq system-type 'windows-nt)))) 
     369                       (or (boundp 'gtk) 
     370                           (and window-system 
     371                                (not (eq window-system 'pc)) 
     372                                (not (eq system-type 'windows-nt))))) 
    370373                      ((string-match "\\`x-" (symbol-name symbol)) 
    371374                       (and (fboundp 'x-create-frame) 
     
    376379                                           x-use-underline-position-properties)))) 
    377380                             (t t)))) 
     381                      ((string-match "selection" (symbol-name symbol)) 
     382                       (fboundp 'x-selection-exists-p)) 
     383                      ((string-match "fringe" (symbol-name symbol)) 
     384                       (fboundp 'define-fringe-bitmap)) 
    378385                      (t t)))) 
    379386    (if (not (boundp symbol))