240 |
CHECK_NUMBER (X_Hot); |
CHECK_NUMBER (X_Hot); |
241 |
CHECK_NUMBER (Y_Hot); |
CHECK_NUMBER (Y_Hot); |
242 |
CHECK_STRING (Data); |
CHECK_STRING (Data); |
243 |
if (XSTRING(Data)->size != 32) return(Qnil); |
if (SCHARS (Data) != 32) return(Qnil); |
244 |
/* |
/* |
245 |
* Setup the new cursor |
* Setup the new cursor |
246 |
*/ |
*/ |
247 |
NewCursor.cur_xhot = X_Hot; |
NewCursor.cur_xhot = X_Hot; |
248 |
NewCursor.cur_yhot = Y_Hot; |
NewCursor.cur_yhot = Y_Hot; |
249 |
cp = XSTRING(Data)->data; |
cp = SDATA (Data); |
250 |
p = CursorData; |
p = CursorData; |
251 |
i = 16; |
i = 16; |
252 |
while(--i >= 0) |
while(--i >= 0) |
267 |
struct selection *sel; |
struct selection *sel; |
268 |
FILE *file; |
FILE *file; |
269 |
{ |
{ |
270 |
fwrite (XSTRING (Current_Selection)->data, sizeof (char), |
fwrite (SDATA (Current_Selection), sizeof (char), |
271 |
sel->sel_items, file); |
sel->sel_items, file); |
272 |
} |
} |
273 |
|
|
330 |
|
|
331 |
CHECK_GFX (Qnil); |
CHECK_GFX (Qnil); |
332 |
selection.sel_type = SELTYPE_CHAR; |
selection.sel_type = SELTYPE_CHAR; |
333 |
selection.sel_items = XSTRING (str)->size; |
selection.sel_items = SCHARS (str); |
334 |
selection.sel_itembytes = 1; |
selection.sel_itembytes = 1; |
335 |
selection.sel_pubflags = 1; |
selection.sel_pubflags = 1; |
336 |
selection_set(&selection, sel_write, sel_clear, win_fd); |
selection_set(&selection, sel_write, sel_clear, win_fd); |
371 |
if (VECTORP (Value)) { |
if (VECTORP (Value)) { |
372 |
submenu = sun_menu_create (Value); |
submenu = sun_menu_create (Value); |
373 |
menu_item = menu_create_item |
menu_item = menu_create_item |
374 |
(MENU_RELEASE, MENU_PULLRIGHT_ITEM, XSTRING(String)->data, submenu, 0); |
(MENU_RELEASE, MENU_PULLRIGHT_ITEM, SDATA (String), submenu, 0); |
375 |
} else { |
} else { |
376 |
menu_item = menu_create_item |
menu_item = menu_create_item |
377 |
(MENU_RELEASE, MENU_STRING_ITEM, XSTRING(String)->data, Value, 0); |
(MENU_RELEASE, MENU_STRING_ITEM, SDATA (String), Value, 0); |
378 |
} |
} |
379 |
return menu_item; |
return menu_item; |
380 |
} |
} |