Mercurial > hg > xemacs-beta
comparison src/glyphs-msw.c @ 444:576fb035e263 r21-2-37
Import from CVS: tag r21-2-37
author | cvs |
---|---|
date | Mon, 13 Aug 2007 11:36:19 +0200 |
parents | abe6d1db359e |
children | d7a9135ec789 |
comparison
equal
deleted
inserted
replaced
443:a8296e22da4e | 444:576fb035e263 |
---|---|
2599 int dest_mask, Lisp_Object domain) | 2599 int dest_mask, Lisp_Object domain) |
2600 { | 2600 { |
2601 /* This function can call lisp */ | 2601 /* This function can call lisp */ |
2602 Lisp_Image_Instance *ii = XIMAGE_INSTANCE (image_instance); | 2602 Lisp_Image_Instance *ii = XIMAGE_INSTANCE (image_instance); |
2603 HWND wnd; | 2603 HWND wnd; |
2604 int flags = WS_TABSTOP;/* BS_NOTIFY #### is needed to get exotic feedback | 2604 int flags = WS_TABSTOP | BS_NOTIFY; |
2605 only. Since we seem to want nothing beyond BN_CLICK, | 2605 /* BS_NOTIFY #### is needed to get exotic feedback only. Since we |
2606 the style is perhaps not necessary -- kkm */ | 2606 seem to want nothing beyond BN_CLICK, the style is perhaps not |
2607 necessary -- kkm */ | |
2607 Lisp_Object style; | 2608 Lisp_Object style; |
2608 Lisp_Object gui = IMAGE_INSTANCE_WIDGET_ITEM (ii); | 2609 Lisp_Object gui = IMAGE_INSTANCE_WIDGET_ITEM (ii); |
2609 Lisp_Gui_Item* pgui = XGUI_ITEM (gui); | 2610 Lisp_Gui_Item* pgui = XGUI_ITEM (gui); |
2610 Lisp_Object glyph = find_keyword_in_vector (instantiator, Q_image); | 2611 Lisp_Object glyph = find_keyword_in_vector (instantiator, Q_image); |
2611 | 2612 |