Mercurial > hg > xemacs-beta
comparison src/scrollbar-msw.c @ 673:685b588e92d8
[xemacs-hg @ 2001-10-30 05:13:26 by andyp]
merge of windows 21.4.5 codeline
author | andyp |
---|---|
date | Tue, 30 Oct 2001 05:13:31 +0000 |
parents | fdefd0186b75 |
children | a307f9a2021d |
comparison
equal
deleted
inserted
replaced
672:42a8626b741e | 673:685b588e92d8 |
---|---|
42 * We do character-based instead of line-based scrolling, which can mean that | 42 * We do character-based instead of line-based scrolling, which can mean that |
43 * without the hack it is impossible to drag to the end of a buffer. */ | 43 * without the hack it is impossible to drag to the end of a buffer. */ |
44 #define VERTICAL_SCROLLBAR_DRAG_HACK | 44 #define VERTICAL_SCROLLBAR_DRAG_HACK |
45 | 45 |
46 static int vertical_drag_in_progress = 0; | 46 static int vertical_drag_in_progress = 0; |
47 extern Lisp_Object mswindows_find_frame (HWND hwnd); | |
47 | 48 |
48 /* As long as the HWND is around, the scrollbar instance must be GC-protected. | 49 /* As long as the HWND is around, the scrollbar instance must be GC-protected. |
49 We have gotten crashes, apparently from trying to access a dead, freed | 50 We have gotten crashes, apparently from trying to access a dead, freed |
50 frame inside of a window mirror pointed to by the scrollbar structure. */ | 51 frame inside of a window mirror pointed to by the scrollbar structure. */ |
51 static Lisp_Object Vmswindows_scrollbar_instance_table; | 52 static Lisp_Object Vmswindows_scrollbar_instance_table; |
233 return; | 234 return; |
234 frame = WINDOW_FRAME (XWINDOW (win)); | 235 frame = WINDOW_FRAME (XWINDOW (win)); |
235 f = XFRAME (frame); | 236 f = XFRAME (frame); |
236 } | 237 } |
237 | 238 |
238 /* SB_LINEDOWN == SB_CHARLEFT etc. This is the way they will | 239 /* SB_LINEDOWN == SB_CHARLEFT etc. This is the way they will |
239 always be -- any Windows is binary compatible backward with | 240 always be - any Windows is binary compatible backward with |
240 old programs. */ | 241 old programs */ |
241 | 242 |
242 switch (code) | 243 switch (code) |
243 { | 244 { |
244 case SB_LINEDOWN: | 245 case SB_LINEDOWN: |
245 mswindows_enqueue_misc_user_event | 246 mswindows_enqueue_misc_user_event |