diff 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
line wrap: on
line diff
--- a/lisp/cus-start.el	Fri Oct 12 19:36:28 2007 +0000
+++ b/lisp/cus-start.el	Fri Oct 12 23:40:42 2007 +0000
@@ -433,7 +433,7 @@
 		      ((string-match "\\`w32-" (symbol-name symbol))
 		       (eq system-type 'windows-nt))
  		      ((string-match "\\`mac-" (symbol-name symbol))
- 		       (or (eq system-type 'mac) (eq system-type 'darwin)))
+		       (eq window-system 'mac))
 		      ((string-match "\\`x-.*gtk" (symbol-name symbol))
 		       (featurep 'gtk))
 		      ((string-match "\\`x-" (symbol-name symbol))