Mercurial > emacs
comparison lisp/cus-start.el @ 85209:c4472165ba35
* cus-start.el (all): Use the same test as the 22.2 branch.
author | Dan Nicolaescu <dann@ics.uci.edu> |
---|---|
date | Fri, 12 Oct 2007 23:40:42 +0000 |
parents | 5039706521c9 |
children | 7f1336541cb1 d38543a1c0f9 |
comparison
equal
deleted
inserted
replaced
85208:8d5ae38b1b47 | 85209:c4472165ba35 |
---|---|
431 ((string-match "\\`dos-" (symbol-name symbol)) | 431 ((string-match "\\`dos-" (symbol-name symbol)) |
432 (eq system-type 'ms-dos)) | 432 (eq system-type 'ms-dos)) |
433 ((string-match "\\`w32-" (symbol-name symbol)) | 433 ((string-match "\\`w32-" (symbol-name symbol)) |
434 (eq system-type 'windows-nt)) | 434 (eq system-type 'windows-nt)) |
435 ((string-match "\\`mac-" (symbol-name symbol)) | 435 ((string-match "\\`mac-" (symbol-name symbol)) |
436 (or (eq system-type 'mac) (eq system-type 'darwin))) | 436 (eq window-system 'mac)) |
437 ((string-match "\\`x-.*gtk" (symbol-name symbol)) | 437 ((string-match "\\`x-.*gtk" (symbol-name symbol)) |
438 (featurep 'gtk)) | 438 (featurep 'gtk)) |
439 ((string-match "\\`x-" (symbol-name symbol)) | 439 ((string-match "\\`x-" (symbol-name symbol)) |
440 (fboundp 'x-create-frame)) | 440 (fboundp 'x-create-frame)) |
441 ((string-match "selection" (symbol-name symbol)) | 441 ((string-match "selection" (symbol-name symbol)) |