comparison src/keyboard.c @ 112434:9de5a68b57e1

Promote SSDATA macro from gtkutil.c and xsmfns.c to lisp.h.
author Paul Eggert <eggert@cs.ucla.edu>
date Sat, 22 Jan 2011 18:56:06 -0800
parents 42e22c4f06b7
children
comparison
equal deleted inserted replaced
112433:7b649f6eac4f 112434:9de5a68b57e1
8175 if (!have_label) 8175 if (!have_label)
8176 { 8176 {
8177 /* Try to make one from caption and key. */ 8177 /* Try to make one from caption and key. */
8178 Lisp_Object key = PROP (TOOL_BAR_ITEM_KEY); 8178 Lisp_Object key = PROP (TOOL_BAR_ITEM_KEY);
8179 Lisp_Object capt = PROP (TOOL_BAR_ITEM_CAPTION); 8179 Lisp_Object capt = PROP (TOOL_BAR_ITEM_CAPTION);
8180 const char *label = SYMBOLP (key) ? (char *) SDATA (SYMBOL_NAME (key)) : ""; 8180 const char *label = SYMBOLP (key) ? SSDATA (SYMBOL_NAME (key)) : "";
8181 const char *caption = STRINGP (capt) ? (char *) SDATA (capt) : ""; 8181 const char *caption = STRINGP (capt) ? SSDATA (capt) : "";
8182 EMACS_INT max_lbl = 2 * tool_bar_max_label_size; 8182 EMACS_INT max_lbl = 2 * tool_bar_max_label_size;
8183 char *buf = (char *) xmalloc (max_lbl + 1); 8183 char *buf = (char *) xmalloc (max_lbl + 1);
8184 Lisp_Object new_lbl; 8184 Lisp_Object new_lbl;
8185 size_t caption_len = strlen (caption); 8185 size_t caption_len = strlen (caption);
8186 8186
12296 mark_object (event->frame_or_window); 12296 mark_object (event->frame_or_window);
12297 mark_object (event->arg); 12297 mark_object (event->arg);
12298 } 12298 }
12299 } 12299 }
12300 } 12300 }
12301