ns-win: set ApplePressAndHoldEnabled to NO as it is unsupported.

This is in preparation for OS X "Lion"; it is a stop-gap solution
until this new input mechanism is supported correctly.

2 files changed, 11 insertions, 0 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 2055ce2b7c7..5c6c84fe3db 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2011-06-21  Tim Harper  <timcharper@gmail.com>
+
+        * term/ns-win.el (ns-initialize-window-system): set
+        application-specific `ApplePressAndHoldEnabled' system
+        resource to NO as it is not yet supported by the NS port.
+
 2011-06-21  Juanma Barranquero  <lekktu@gmail.com>
 
         * misc.el (list-dynamic-libraries--refresh): Compute header here...
diff --git a/lisp/term/ns-win.el b/lisp/term/ns-win.el
index 712929ecec0..fbf3e91d3d9 100644
--- a/lisp/term/ns-win.el
+++ b/lisp/term/ns-win.el
@@ -916,6 +916,11 @@ See the documentation of `create-fontset-from-fontset-spec' for the format.")
   ;; FIXME: This will surely lead to "MODIFIED OUTSIDE CUSTOM" warnings.
   (menu-bar-mode (if (get-lisp-resource nil "Menus") 1 -1))
 
+  ;; OS X Lion introduces PressAndHold, which is unsupported by this port. 
+  ;; See this thread for more details:
+  ;; http://lists.gnu.org/archive/html/emacs-devel/2011-06/msg00505.html
+  (ns-set-resource nil "ApplePressAndHoldEnabled" "NO")
+
   (setq ns-initialized t))
 
 (add-to-list 'handle-args-function-alist '(ns . x-handle-args))