diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/w32fns.c | 2 | ||||
| -rw-r--r-- | src/xfns.c | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/src/w32fns.c b/src/w32fns.c index f9ce762f0e9..4be322182ce 100644 --- a/src/w32fns.c +++ b/src/w32fns.c @@ -6377,7 +6377,7 @@ compute_tip_xy (struct frame *f, if (INTEGERP (left)) *root_x = XINT (left); else if (INTEGERP (right)) - *root_y = XINT (right) - width; + *root_x = XINT (right) - width; else if (*root_x + XINT (dx) <= min_x) *root_x = 0; /* Can happen for negative dx */ else if (*root_x + XINT (dx) + width <= max_x) diff --git a/src/xfns.c b/src/xfns.c index 313ac52f12a..ab6b92256bd 100644 --- a/src/xfns.c +++ b/src/xfns.c @@ -5719,7 +5719,7 @@ compute_tip_xy (struct frame *f, Lisp_Object parms, Lisp_Object dx, Lisp_Object if (INTEGERP (left)) *root_x = XINT (left); else if (INTEGERP (right)) - *root_y = XINT (right) - width; + *root_x = XINT (right) - width; else if (*root_x + XINT (dx) <= 0) *root_x = 0; /* Can happen for negative dx */ else if (*root_x + XINT (dx) + width |