# HG changeset patch # User Chong Yidong # Date 1263221692 18000 # Node ID 4d61ac1aa561be35e22d30b8425fcb337ea9b377 # Parent f039ef236594c44cd7032976fd2382b6b09bdf5e * nsterm.m (syms_of_nsterm): Initialize Qcontrol etc. before initializing the Lisp variables that depend on them. diff -r f039ef236594 -r 4d61ac1aa561 src/ChangeLog --- a/src/ChangeLog Sun Jan 10 23:51:51 2010 -0800 +++ b/src/ChangeLog Mon Jan 11 09:54:52 2010 -0500 @@ -1,3 +1,8 @@ +2010-01-11 Chong Yidong + + * nsterm.m (syms_of_nsterm): Initialize Qcontrol etc. before + initializing the Lisp variables that depend on them. + 2010-01-11 YAMAMOTO Mitsuharu * xfns.c (x_set_menu_bar_lines) [!USE_X_TOOLKIT && !USE_GTK]: diff -r f039ef236594 -r 4d61ac1aa561 src/nsterm.m --- a/src/nsterm.m Sun Jan 10 23:51:51 2010 -0800 +++ b/src/nsterm.m Mon Jan 11 09:54:52 2010 -0500 @@ -6144,6 +6144,19 @@ ns_antialias_threshold = 10.0; + /* from 23+ we need to tell emacs what modifiers there are.. */ + Qmodifier_value = intern ("modifier-value"); + Qalt = intern ("alt"); + Fput (Qalt, Qmodifier_value, make_number (alt_modifier)); + Qhyper = intern ("hyper"); + Fput (Qhyper, Qmodifier_value, make_number (hyper_modifier)); + Qmeta = intern ("meta"); + Fput (Qmeta, Qmodifier_value, make_number (meta_modifier)); + Qsuper = intern ("super"); + Fput (Qsuper, Qmodifier_value, make_number (super_modifier)); + Qcontrol = intern ("control"); + Fput (Qcontrol, Qmodifier_value, make_number (ctrl_modifier)); + DEFVAR_LISP ("ns-input-file", &ns_input_file, "The file specified in the last NS event."); ns_input_file =Qnil; @@ -6218,19 +6231,6 @@ staticpro (&last_mouse_motion_frame); last_mouse_motion_frame = Qnil; - /* from 23+ we need to tell emacs what modifiers there are.. */ - Qmodifier_value = intern ("modifier-value"); - Qalt = intern ("alt"); - Fput (Qalt, Qmodifier_value, make_number (alt_modifier)); - Qhyper = intern ("hyper"); - Fput (Qhyper, Qmodifier_value, make_number (hyper_modifier)); - Qmeta = intern ("meta"); - Fput (Qmeta, Qmodifier_value, make_number (meta_modifier)); - Qsuper = intern ("super"); - Fput (Qsuper, Qmodifier_value, make_number (super_modifier)); - Qcontrol = intern ("control"); - Fput (Qcontrol, Qmodifier_value, make_number (ctrl_modifier)); - /* TODO: move to common code */ DEFVAR_LISP ("x-toolkit-scroll-bars", &Vx_toolkit_scroll_bars, doc: /* If not nil, Emacs uses toolkit scroll bars. */);