comparison src/menubar-msw.c @ 282:c42ec1d1cded r21-0b39

Import from CVS: tag r21-0b39
author cvs
date Mon, 13 Aug 2007 10:33:18 +0200
parents 90d73dddcdc4
children 57709be46d1b
comparison
equal deleted inserted replaced
281:090b52736db2 282:c42ec1d1cded
281 if (NILP(path)) 281 if (NILP(path))
282 /* list1 cannot GC */ 282 /* list1 cannot GC */
283 path = list1 (gui_item.name); 283 path = list1 (gui_item.name);
284 else 284 else
285 { 285 {
286 Lisp_Object arg[2] = { path, list1 (gui_item.name) }; 286 Lisp_Object arg[2];
287 arg[0] = path;
288 arg[1] = list1 (gui_item.name);
287 /* Fappend gcpro'es its arg */ 289 /* Fappend gcpro'es its arg */
288 path = Fappend (2, arg); 290 path = Fappend (2, arg);
289 } 291 }
290 292
291 /* Fputhash GCPRO'es PATH */ 293 /* Fputhash GCPRO'es PATH */