* macterm.c (syms_of_macterm): Provide the feature "mac-carbon" to

[gnu-emacs] / src / macterm.c

diff --git a/src/macterm.c b/src/macterm.c
index 0e97e6bbb30055e8e3a5a2776681f7ab610b894c..cae4172854e6a3c2683eb7e638a706b7fb890073 100644 (file)
--- a/src/macterm.c
+++ b/src/macterm.c
@@ -13693,6 +13693,8 @@ syms_of_macterm ()
   x_error_message_string = Qnil;
 #endif
 
+  Fprovide (intern ("mac-carbon"), Qnil);
+
   staticpro (&x_display_name_list);
   x_display_name_list = Qnil;
 
@@ -13760,7 +13762,7 @@ Otherwise the option key is used.  */);
    doc: /* Non-nil means that the wheel button will be treated as mouse-2 and
 the right click will be mouse-3.
 Otherwise, the right click will be mouse-2 and the wheel button mouse-3.*/);
-  Vmac_wheel_button_is_mouse_2 = Qnil;
+  Vmac_wheel_button_is_mouse_2 = Qt;
 
   DEFVAR_LISP ("mac-pass-command-to-system", &Vmac_pass_command_to_system,
    doc: /* If non-nil, the Mac \"Command\" key is passed on to the Mac