Mercurial > emacs
comparison lisp/term/ns-win.el @ 104987:3727134fef6c
* term/x-win.el (x-initialize-window-system):
* term/w32-win.el (w32-initialize-window-system):
* term/ns-win.el (ns-initialize-window-system): Don't call
mouse-wheel-mode since it's enabled globally by default already.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Sat, 12 Sep 2009 19:04:24 +0000 |
| parents | 05d4f1d2bf6c |
| children | b520d55cdd72 |
comparison
equal
deleted
inserted
replaced
| 104986:00c7c0e3f902 | 104987:3727134fef6c |
|---|---|
| 1251 (eq (get-lisp-resource nil "HideOnAutoLaunch") t)) | 1251 (eq (get-lisp-resource nil "HideOnAutoLaunch") t)) |
| 1252 (add-hook 'after-init-hook 'ns-do-hide-emacs)) | 1252 (add-hook 'after-init-hook 'ns-do-hide-emacs)) |
| 1253 | 1253 |
| 1254 ;; FIXME: This will surely lead to "MODIFIED OUTSIDE CUSTOM" warnings. | 1254 ;; FIXME: This will surely lead to "MODIFIED OUTSIDE CUSTOM" warnings. |
| 1255 (menu-bar-mode (if (get-lisp-resource nil "Menus") 1 -1)) | 1255 (menu-bar-mode (if (get-lisp-resource nil "Menus") 1 -1)) |
| 1256 (mouse-wheel-mode 1) | |
| 1257 | 1256 |
| 1258 (setq ns-initialized t)) | 1257 (setq ns-initialized t)) |
| 1259 | 1258 |
| 1260 (add-to-list 'handle-args-function-alist '(ns . ns-handle-args)) | 1259 (add-to-list 'handle-args-function-alist '(ns . ns-handle-args)) |
| 1261 (add-to-list 'frame-creation-function-alist '(ns . x-create-frame-with-faces)) | 1260 (add-to-list 'frame-creation-function-alist '(ns . x-create-frame-with-faces)) |