summaryrefslogtreecommitdiffstats
path: root/src/gui_x11.c
diff options
context:
space:
mode:
authorBram Moolenaar <Bram@vim.org>2022-04-03 18:02:37 +0100
committerBram Moolenaar <Bram@vim.org>2022-04-03 18:02:37 +0100
commit0b962e5685edd41b55d5427b894797e725707639 (patch)
tree0b6bddeb6a2c7da603b71474b87f185dc14a02ea /src/gui_x11.c
parent292e1b9f681054a1de8fa22315ae6eedd7acb205 (diff)
patch 8.2.4677: the Athena GUI support is outdatedv8.2.4677
Problem: The Athena GUI support is outdated. Solution: Remove the Athena GUI code.
Diffstat (limited to 'src/gui_x11.c')
-rw-r--r--src/gui_x11.c72
1 files changed, 7 insertions, 65 deletions
diff --git a/src/gui_x11.c b/src/gui_x11.c
index 31363a8991..6e3e903be4 100644
--- a/src/gui_x11.c
+++ b/src/gui_x11.c
@@ -8,7 +8,7 @@
* See README.txt for an overview of the Vim source code.
*/
/*
- * Common code for the Motif and Athena GUI.
+ * Code for the Motif GUI.
* Not used for GTK.
*/
@@ -66,22 +66,13 @@
#endif
#define DFLT_TOOLTIP_FONT XtDefaultFontSet
-#ifdef FEAT_GUI_ATHENA
-# define DFLT_MENU_BG_COLOR "gray77"
-# define DFLT_MENU_FG_COLOR "black"
-# define DFLT_SCROLL_BG_COLOR "gray60"
-# define DFLT_SCROLL_FG_COLOR "gray77"
-# define DFLT_TOOLTIP_BG_COLOR "#ffff91"
-# define DFLT_TOOLTIP_FG_COLOR "#000000"
-#else
// use the default (CDE) colors
-# define DFLT_MENU_BG_COLOR ""
-# define DFLT_MENU_FG_COLOR ""
-# define DFLT_SCROLL_BG_COLOR ""
-# define DFLT_SCROLL_FG_COLOR ""
-# define DFLT_TOOLTIP_BG_COLOR "#ffff91"
-# define DFLT_TOOLTIP_FG_COLOR "#000000"
-#endif
+#define DFLT_MENU_BG_COLOR ""
+#define DFLT_MENU_FG_COLOR ""
+#define DFLT_SCROLL_BG_COLOR ""
+#define DFLT_SCROLL_FG_COLOR ""
+#define DFLT_TOOLTIP_BG_COLOR "#ffff91"
+#define DFLT_TOOLTIP_FG_COLOR "#000000"
Widget vimShell = (Widget)0;
@@ -385,17 +376,6 @@ static XtResource vim_resources[] =
(XtPointer)SB_DEFAULT_WIDTH
},
#ifdef FEAT_MENU
-# ifdef FEAT_GUI_ATHENA // with Motif the height is always computed
- {
- XtNmenuHeight,
- XtCMenuHeight,
- XtRInt,
- sizeof(int),
- XtOffsetOf(gui_T, menu_height),
- XtRImmediate,
- (XtPointer)MENU_DEFAULT_HEIGHT // Should figure out at run time
- },
-# endif
{
# ifdef FONTSET_ALWAYS
XtNmenuFontSet,
@@ -1275,8 +1255,6 @@ gui_mch_init(void)
* Get the colors ourselves. Using the automatic conversion doesn't
* handle looking for approximate colors.
*/
- // NOTE: These next few lines are an exact duplicate of gui_athena.c's
- // gui_mch_def_colors(). Why?
gui.menu_fg_pixel = gui_get_color((char_u *)gui.rsrc_menu_fg_name);
gui.menu_bg_pixel = gui_get_color((char_u *)gui.rsrc_menu_bg_name);
gui.scroll_fg_pixel = gui_get_color((char_u *)gui.rsrc_scroll_fg_name);
@@ -1286,12 +1264,6 @@ gui_mch_init(void)
gui.tooltip_bg_pixel = gui_get_color((char_u *)gui.rsrc_tooltip_bg_name);
#endif
-#if defined(FEAT_MENU) && defined(FEAT_GUI_ATHENA)
- // If the menu height was set, don't change it at runtime
- if (gui.menu_height != MENU_DEFAULT_HEIGHT)
- gui.menu_height_fixed = TRUE;
-#endif
-
// Set default foreground and background colours
gui.norm_pixel = gui.def_norm_pixel;
gui.back_pixel = gui.def_back_pixel;
@@ -1454,11 +1426,7 @@ gui_mch_init(void)
XpmFreeAttributes(&attr);
}
-# ifdef FEAT_GUI_ATHENA
- XtVaSetValues(vimShell, XtNiconPixmap, icon, XtNiconMask, icon_mask, NULL);
-# else
XtVaSetValues(vimShell, XmNiconPixmap, icon, XmNiconMask, icon_mask, NULL);
-# endif
#endif
}
@@ -1578,16 +1546,6 @@ gui_mch_open(void)
gui_x11_send_event_handler, NULL);
#endif
-
-#if defined(FEAT_MENU) && defined(FEAT_GUI_ATHENA)
- // The Athena GUI needs this again after opening the window
- gui_position_menu();
-# ifdef FEAT_TOOLBAR
- gui_mch_set_toolbar_pos(0, gui.menu_height, gui.menu_width,
- gui.toolbar_height);
-# endif
-#endif
-
// Get the colors for the highlight groups (gui_check_colors() might have
// changed them)
highlight_gui_started(); // re-init colors and fonts
@@ -2154,22 +2112,6 @@ fontset_height(
return extents->max_logical_extent.height;
}
-#if (defined(FONTSET_ALWAYS) && defined(FEAT_GUI_ATHENA) \
- && defined(FEAT_MENU)) || defined(PROTO)
-/*
- * Returns the bounding box height around the actual glyph image of all
- * characters in all fonts of the fontset.
- */
- int
-fontset_height2(XFontSet fs)
-{
- XFontSetExtents *extents;
-
- extents = XExtentsOfFontSet(fs);
- return extents->max_ink_extent.height;
-}
-#endif
-
#if 0
// NOT USED YET
static int