/[emacs]/emacs/src/sunfns.c
ViewVC logotype

Diff of /emacs/src/sunfns.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.22.4.1 by miles, Fri Apr 4 06:21:03 2003 UTC revision 1.22.4.2 by miles, Tue Oct 14 23:22:46 2003 UTC
# Line 454  as a menu label.  */) Line 454  as a menu label.  */)
454    
455    CHECK_GFX (Qnil);    CHECK_GFX (Qnil);
456    
457    xpos = CtoSX (WINDOW_LEFT_MARGIN (XWINDOW (window)) + XINT(X_Position));    xpos = CtoSX (WINDOW_LEFT_EDGE_COL (XWINDOW (window))
458    ypos = CtoSY (XWINDOW(window)->top  + XINT(Y_Position));                  + WINDOW_LEFT_SCROLL_BAR_COLS (XWINDOW (window))
459                    + XINT(X_Position));
460      ypos = CtoSY (WINDOW_TOP_EDGE_LINE (XWINDOW(window)) + XINT(Y_Position));
461  #ifdef  Menu_Base_Kludge  #ifdef  Menu_Base_Kludge
462    {static Lisp_Object symbol[2];    {static Lisp_Object symbol[2];
463     symbol[0] = Fintern (sm_kludge_string, Qnil);     symbol[0] = Fintern (sm_kludge_string, Qnil);
# Line 511  syms_of_sunfns() Line 513  syms_of_sunfns()
513    defsubr(&Ssun_get_selection);    defsubr(&Ssun_get_selection);
514    defsubr(&Ssun_menu_internal);    defsubr(&Ssun_menu_internal);
515  }  }
516    
517    /* arch-tag: 2d7decb7-58f6-41aa-b45b-077ccfab7158
518       (do not change this comment) */

Legend:
Removed from v.1.22.4.1  
changed lines
  Added in v.1.22.4.2

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26