# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 864969227 0
# Node ID d6297be18ba85fc5a1eadb9a2b00417bf1bccf0f
# Parent  edf54f605b36c4f9f8174236f962c5d887d8b4ac
(x_real_positions): Subtract border width from results.

diff -r edf54f605b36 -r d6297be18ba8 src/xfns.c
--- a/src/xfns.c	Fri May 30 05:11:26 1997 +0000
+++ b/src/xfns.c	Fri May 30 05:13:47 1997 +0000
@@ -1011,8 +1011,8 @@
       x_uncatch_errors (FRAME_X_DISPLAY (f), count);
     }
 
-  *xptr = win_x;
-  *yptr = win_y;
+  *xptr = win_x - f->output_data.x->border_width;
+  *yptr = win_y - f->output_data.x->border_width;
 }
 
 /* Insert a description of internally-recorded parameters of frame X