[Emacs-diffs] Changes to emacs/src/sunfns.c [lexbind]

[Miles Bader]

Index: emacs/src/sunfns.c
diff -c emacs/src/sunfns.c:1.22.4.1 emacs/src/sunfns.c:1.22.4.2
*** emacs/src/sunfns.c:1.22.4.1 Fri Apr  4 01:21:03 2003
--- emacs/src/sunfns.c  Tue Oct 14 19:22:46 2003
***************
*** 454,461 ****
  
    CHECK_GFX (Qnil);
  
!   xpos = CtoSX (WINDOW_LEFT_MARGIN (XWINDOW (window)) + XINT(X_Position));
!   ypos = CtoSY (XWINDOW(window)->top  + XINT(Y_Position));
  #ifdef  Menu_Base_Kludge
    {static Lisp_Object symbol[2];
     symbol[0] = Fintern (sm_kludge_string, Qnil);
--- 454,463 ----
  
    CHECK_GFX (Qnil);
  
!   xpos = CtoSX (WINDOW_LEFT_EDGE_COL (XWINDOW (window))
!               + WINDOW_LEFT_SCROLL_BAR_COLS (XWINDOW (window))
!               + XINT(X_Position));
!   ypos = CtoSY (WINDOW_TOP_EDGE_LINE (XWINDOW(window)) + XINT(Y_Position));
  #ifdef  Menu_Base_Kludge
    {static Lisp_Object symbol[2];
     symbol[0] = Fintern (sm_kludge_string, Qnil);
***************
*** 511,513 ****
--- 513,518 ----
    defsubr(&Ssun_get_selection);
    defsubr(&Ssun_menu_internal);
  }
+ 
+ /* arch-tag: 2d7decb7-58f6-41aa-b45b-077ccfab7158
+    (do not change this comment) */