(x_report_frame_params): Return actual fringe widths.

diff --git a/mac/src/macfns.c b/mac/src/macfns.c
index 312c9e5c71931ef88daf081aed42451f5f2345a0..04055d4caf501b5ce930672fbec29d142964ec95 100644 (file)
--- a/mac/src/macfns.c
+++ b/mac/src/macfns.c
@@ -1002,6 +1002,10 @@ x_report_frame_params (f, alistptr)
                   make_number (f->output_data.mac->border_width));
   store_in_alist (alistptr, Qinternal_border_width,
                   make_number (f->output_data.mac->internal_border_width));
+  store_in_alist (alistptr, Qleft_fringe,
+                  make_number (f->output_data.mac->left_fringe_width));
+  store_in_alist (alistptr, Qright_fringe,
+                  make_number (f->output_data.mac->right_fringe_width));
   sprintf (buf, "%ld", (long) FRAME_MAC_WINDOW (f));
   store_in_alist (alistptr, Qwindow_id,
                   build_string (buf));

diff --git a/src/w32fns.c b/src/w32fns.c
index 3d149c53cf77063bde67b33d31f9443b2e4f56a1..3f8e5f0036dddda0be784bc2e5de702ce9f99353 100644 (file)
--- a/src/w32fns.c
+++ b/src/w32fns.c
@@ -1076,6 +1076,10 @@ x_report_frame_params (f, alistptr)
                   make_number (f->output_data.w32->border_width));
   store_in_alist (alistptr, Qinternal_border_width,
                   make_number (f->output_data.w32->internal_border_width));
+  store_in_alist (alistptr, Qleft_fringe,
+                  make_number (f->output_data.w32->left_fringe_width));
+  store_in_alist (alistptr, Qright_fringe,
+                  make_number (f->output_data.w32->right_fringe_width));
   sprintf (buf, "%ld", (long) FRAME_W32_WINDOW (f));
   store_in_alist (alistptr, Qwindow_id,
                   build_string (buf));