procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Provide move-toolbar in a more appropriate place

Browse source 
* src/frame.c (syms_of_frame): Provide `move-toolbar' here...
* src/keyboard.c (syms_of_keyboard): ..instead of here.
This commit is contained in:
Po Lu 2023-07-03 08:56:21 +08:00
parent 3a07511f1b
commit 30f83e3093
2 changed files with 13 additions and 13 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

13
src/frame.c
View file

@ -6809,4 +6809,17 @@ iconify the top level frame instead. */);
defsubr (&Sx_parse_geometry);
defsubr (&Sreconsider_frame_fonts);
#endif
#ifdef HAVE_WINDOW_SYSTEM
DEFSYM (Qmove_toolbar, "move-toolbar");
/* The `tool-bar-position' frame parameter is supported on GTK and
builds using the internal tool bar. Providing this feature
causes menu-bar.el to provide `tool-bar-position' as a user
option. */
#if !defined HAVE_EXT_TOOL_BAR || defined USE_GTK
Fprovide (Qmove_toolbar, Qnil);
#endif /* !HAVE_EXT_TOOL_BAR || USE_GTK */
#endif /* HAVE_WINDOW_SYSTEM */
}

13
src/keyboard.c
View file

@ -12793,19 +12793,6 @@ See also `pre-command-hook'. */);
DEFSYM (Qcoding, "coding");
#ifdef HAVE_WINDOW_SYSTEM
DEFSYM (Qmove_toolbar, "move-toolbar");
/* The `tool-bar-position' frame parameter is supported on GTK and
builds using the internal tool bar. Providing this feature
causes menu-bar.el to provide `tool-bar-position' as a user
option. */
#if !defined HAVE_EXT_TOOL_BAR || defined USE_GTK
Fprovide (Qmove_toolbar, Qnil);
#endif /* !HAVE_EXT_TOOL_BAR || USE_GTK */
#endif /* HAVE_WINDOW_SYSTEM */
Fset (Qecho_area_clear_hook, Qnil);
#ifdef USE_LUCID