Mercurial > hg > xemacs-beta
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 */ |