aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorPo Lu2023-07-03 08:42:24 +0800
committerPo Lu2023-07-03 08:42:24 +0800
commitd0c1e97397aed68170b454cb9e2dce0dca3dee2b (patch)
tree1fa9e5d4f950db6e0ceadfbbc4563bdf65955076
parenta5bf0ae66141e7560f70a045c0dea132a4868c87 (diff)
downloademacs-d0c1e97397aed68170b454cb9e2dce0dca3dee2b.tar.gz
emacs-d0c1e97397aed68170b454cb9e2dce0dca3dee2b.zip
Always provide `move-toolbar' when its position can be changed
* src/keyboard.c (syms_of_keyboard): Make `move-toolbar' a defsym. Provide that feature if Emacs uses its internal tool bars or GTK+. * src/xfns.c (syms_of_xfns): Stop provide `move-toolbar' here.
-rw-r--r--src/keyboard.c12
-rw-r--r--src/xfns.c1
2 files changed, 12 insertions, 1 deletions
diff --git a/src/keyboard.c b/src/keyboard.c
index b61b1766856..74e30d111db 100644
--- a/src/keyboard.c
+++ b/src/keyboard.c
@@ -12793,6 +12793,18 @@ See also `pre-command-hook'. */);
12793 12793
12794 DEFSYM (Qcoding, "coding"); 12794 DEFSYM (Qcoding, "coding");
12795 12795
12796#ifdef HAVE_WINDOW_SYSTEM
12797 DEFSYM (Qmove_toolbar, "move-toolbar");
12798
12799 /* The `tool-bar-position' is supported on GTK and builds using the
12800 internal tool bar. Providing this feature causes menu-bar.el to
12801 provide `tool-bar-position' as a user option. */
12802
12803#if !defined HAVE_EXT_TOOL_BAR || defined USE_GTK
12804 Fprovide (Qmove_toolbar, Qnil);
12805#endif /* !HAVE_EXT_TOOL_BAR || USE_GTK */
12806#endif /* HAVE_WINDOW_SYSTEM */
12807
12796 Fset (Qecho_area_clear_hook, Qnil); 12808 Fset (Qecho_area_clear_hook, Qnil);
12797 12809
12798#ifdef USE_LUCID 12810#ifdef USE_LUCID
diff --git a/src/xfns.c b/src/xfns.c
index a58e854811b..5c9f58e3a96 100644
--- a/src/xfns.c
+++ b/src/xfns.c
@@ -10456,7 +10456,6 @@ eliminated in future versions of Emacs. */);
10456 accepts --with-x-toolkit=gtk. */ 10456 accepts --with-x-toolkit=gtk. */
10457 Fprovide (intern_c_string ("x-toolkit"), Qnil); 10457 Fprovide (intern_c_string ("x-toolkit"), Qnil);
10458 Fprovide (intern_c_string ("gtk"), Qnil); 10458 Fprovide (intern_c_string ("gtk"), Qnil);
10459 Fprovide (intern_c_string ("move-toolbar"), Qnil);
10460 10459
10461 DEFVAR_LISP ("gtk-version-string", Vgtk_version_string, 10460 DEFVAR_LISP ("gtk-version-string", Vgtk_version_string,
10462 doc: /* Version info for GTK+. */); 10461 doc: /* Version info for GTK+. */);