# HG changeset patch
# User Kim F. Storm <storm@cua.dk>
# Date 1007593338 0
# Node ID efe03af8f775c6c0654227648359ae3dc3b92463
# Parent  ad13493331f73b429165ad23e6d0cc2a5042ab0b
(x_report_frame_params): Return actual fringe widths.

diff -r ad13493331f7 -r efe03af8f775 mac/src/macfns.c
--- a/mac/src/macfns.c	Wed Dec 05 22:58:22 2001 +0000
+++ b/mac/src/macfns.c	Wed Dec 05 23:02:18 2001 +0000
@@ -1002,6 +1002,10 @@
        	   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 -r ad13493331f7 -r efe03af8f775 src/w32fns.c
--- a/src/w32fns.c	Wed Dec 05 22:58:22 2001 +0000
+++ b/src/w32fns.c	Wed Dec 05 23:02:18 2001 +0000
@@ -1076,6 +1076,10 @@
        	   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));