diff options
| author | Martin Rudalics <rudalics@gmx.at> | 2011-06-06 08:57:59 +0200 |
|---|---|---|
| committer | Martin Rudalics <rudalics@gmx.at> | 2011-06-06 08:57:59 +0200 |
| commit | 1d00388aae9e39ceb8e520b5f227c21fdd219a20 (patch) | |
| tree | 0fae32c463f63162d608b9038dd63fe73b9dfb59 /src/gtkutil.c | |
| parent | 348f5121cd84ade8ce29d557e7f1215694027b05 (diff) | |
| parent | 4d09bcf621ec32e17fdb8dd2ea08344486f7aeef (diff) | |
| download | emacs-old-branches/window-pub.tar.gz | |
Merge from trunkold-branches/window-pub
Diffstat (limited to 'src/gtkutil.c')
| -rw-r--r-- | src/gtkutil.c | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/src/gtkutil.c b/src/gtkutil.c index 6e54006d913..dedb39a7a40 100644 --- a/src/gtkutil.c +++ b/src/gtkutil.c @@ -3326,6 +3326,25 @@ xg_get_widget_from_map (int idx) return 0; } +int +xg_get_default_scrollbar_width (FRAME_PTR f) +{ +#ifdef HAVE_GTK3 + GtkAdjustment *vadj; +#else + GtkObject *vadj; +#endif + GtkWidget *wscroll; + int w = 0, b = 0; + vadj = gtk_adjustment_new (XG_SB_MIN, XG_SB_MIN, XG_SB_MAX, 0.1, 0.1, 0.1); + wscroll = gtk_vscrollbar_new (GTK_ADJUSTMENT (vadj)); + gtk_widget_style_get (wscroll, "slider-width", &w, "trough-border", &b, NULL); + gtk_widget_destroy (wscroll); + w += 2*b; + if (w < 16) w = 16; + return w; +} + /* Return the scrollbar id for X Window WID on display DPY. Return -1 if WID not in id_to_widget. */ |