Mercurial > hg > xemacs-beta
comparison src/menubar-msw.c @ 382:064ab7fed2e0 r21-2-6
Import from CVS: tag r21-2-6
author | cvs |
---|---|
date | Mon, 13 Aug 2007 11:07:39 +0200 |
parents | 8626e4521993 |
children | bbff43aa5eb7 |
comparison
equal
deleted
inserted
replaced
381:908a86f940e6 | 382:064ab7fed2e0 |
---|---|
621 { | 621 { |
622 /* Try to map the command id through the proper hash table */ | 622 /* Try to map the command id through the proper hash table */ |
623 Lisp_Object data, fn, arg, frame; | 623 Lisp_Object data, fn, arg, frame; |
624 struct gcpro gcpro1; | 624 struct gcpro gcpro1; |
625 | 625 |
626 if (NILP (current_hash_table)) | |
627 return Qnil; | |
628 | |
626 data = Fgethash (make_int (id), current_hash_table, Qunbound); | 629 data = Fgethash (make_int (id), current_hash_table, Qunbound); |
630 | |
627 if (UNBOUNDP (data)) | 631 if (UNBOUNDP (data)) |
628 { | 632 { |
629 menu_cleanup (f); | 633 menu_cleanup (f); |
630 return Qnil; | 634 return Qnil; |
631 } | 635 } |