Mercurial > emacs
comparison lisp/cus-start.el @ 65403:4b9f048f9a7e
Fix last change.
author | Eli Zaretskii <eliz@gnu.org> |
---|---|
date | Fri, 09 Sep 2005 16:24:25 +0000 |
parents | 27b65d33884f |
children | b3ed9c9b7a4f 5a8e49e5b281 10fe5fadaf89 |
comparison
equal
deleted
inserted
replaced
65402:873aa2fb049c | 65403:4b9f048f9a7e |
---|---|
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 (or (boundp 'gtk) |
370 (and (display-graphic-p) | 370 (and window-system |
371 (not (eq window-system 'pc)) | |
371 (not (eq system-type 'windows-nt))))) | 372 (not (eq system-type 'windows-nt))))) |
372 ((string-match "\\`x-" (symbol-name symbol)) | 373 ((string-match "\\`x-" (symbol-name symbol)) |
373 (fboundp 'x-create-frame)) | 374 (fboundp 'x-create-frame)) |
374 ((string-match "selection" (symbol-name symbol)) | 375 ((string-match "selection" (symbol-name symbol)) |
375 (fboundp 'x-selection-exists-p)) | 376 (fboundp 'x-selection-exists-p)) |