From: Eli Zaretskii <eliz@gnu.org>
Date: Sat, 21 Mar 2009 09:47:13 +0000 (+0000)
Subject: (all): Fix last change.
X-Git-Tag: emacs-pretest-23.0.92~114
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=77346ecd110293a29a2b4ca1136b5e01e78e6e29;p=emacs.git

(all): Fix last change.
---

diff --git a/lisp/cus-start.el b/lisp/cus-start.el
index e2ed7585c3f..8f444799ae7 100644
--- a/lisp/cus-start.el
+++ b/lisp/cus-start.el
@@ -249,25 +249,25 @@ Leaving \"Default\" unchecked is equivalent with specifying a default of
 	     ;; msdos.c
 	     (dos-unsupported-char-glyph display integer)
 	     ;; nsterm.m
-	     (ns-control-modifier 
-	      nextstep 
+	     (ns-control-modifier
+	      nextstep
 	      (choice (const :tag "No modifier" nil)
 		      (const control) (const meta)
 		      (const alt) (const hyper)
 		      (const super)) "23.1")
-	     (ns-command-modifier 
-	      nextstep 
+	     (ns-command-modifier
+	      nextstep
 	      (choice (const :tag "No modifier" nil)
 		      (const control) (const meta)
 		      (const alt) (const hyper)
 		      (const super)) "23.1")
-	     (ns-alternate-modifier 
-	      nextstep 
+	     (ns-alternate-modifier
+	      nextstep
 	      (choice (const :tag "No modifier (work as alternate/option)" none)
 		      (const control) (const meta)
 		      (const alt) (const hyper)
 		      (const super)) "23.1")
-	     (ns-function-modifier 
+	     (ns-function-modifier
 	      nextstep
 	      (choice (const :tag "No modifier (work as function)" none)
 		      (const control) (const meta)
@@ -381,6 +381,8 @@ since it could result in memory overflow and make Emacs crash."
 		       (eq system-type 'ms-dos))
 		      ((string-match "\\`w32-" (symbol-name symbol))
 		       (eq system-type 'windows-nt))
+		      ((string-match "\\`ns-" (symbol-name symbol))
+		       (featurep 'ns))
 		      ((string-match "\\`x-.*gtk" (symbol-name symbol))
 		       (featurep 'gtk))
 		      ((string-match "\\`x-" (symbol-name symbol))