diff options
Diffstat (limited to 'lisp/term')
| -rw-r--r-- | lisp/term/ns-win.el | 13 |
1 files changed, 7 insertions, 6 deletions
diff --git a/lisp/term/ns-win.el b/lisp/term/ns-win.el index 91849dbbdcf..bc9cab375bf 100644 --- a/lisp/term/ns-win.el +++ b/lisp/term/ns-win.el | |||
| @@ -912,12 +912,13 @@ See the documentation of `create-fontset-from-fontset-spec' for the format.") | |||
| 912 | ;; FIXME: This will surely lead to "MODIFIED OUTSIDE CUSTOM" warnings. | 912 | ;; FIXME: This will surely lead to "MODIFIED OUTSIDE CUSTOM" warnings. |
| 913 | (menu-bar-mode (if (get-lisp-resource nil "Menus") 1 -1)) | 913 | (menu-bar-mode (if (get-lisp-resource nil "Menus") 1 -1)) |
| 914 | 914 | ||
| 915 | ;; For NS nothing except UTF-8 makes sense. | 915 | ;; For Darwin nothing except UTF-8 makes sense. |
| 916 | (add-hook 'before-init-hook | 916 | (when (eq system-type 'darwin) |
| 917 | #'(lambda () | 917 | (add-hook 'before-init-hook |
| 918 | (setq locale-coding-system 'utf-8-unix) | 918 | #'(lambda () |
| 919 | (setq default-process-coding-system | 919 | (setq locale-coding-system 'utf-8-unix) |
| 920 | '(utf-8-unix . utf-8-unix)))) | 920 | (setq default-process-coding-system |
| 921 | '(utf-8-unix . utf-8-unix))))) | ||
| 921 | 922 | ||
| 922 | ;; OS X Lion introduces PressAndHold, which is unsupported by this port. | 923 | ;; OS X Lion introduces PressAndHold, which is unsupported by this port. |
| 923 | ;; See this thread for more details: | 924 | ;; See this thread for more details: |