diff options
author | Karl Heuer <kwzh@gnu.org> | 1994-09-27 01:21:05 +0000 |
---|---|---|
committer | Karl Heuer <kwzh@gnu.org> | 1994-09-27 01:21:05 +0000 |
commit | d04ed902441b0e7f2145afc6d288913c5c7764af (patch) | |
tree | cc773509dc46eaea2046dd276104753f17e934db /src/sunfns.c | |
parent | eccee1308a1043eef0753c1c7acd484f50fc12c0 (diff) | |
download | emacs-d04ed902441b0e7f2145afc6d288913c5c7764af.tar.gz |
(sun_item_create): Use type test macros.
Diffstat (limited to 'src/sunfns.c')
-rw-r--r-- | src/sunfns.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/sunfns.c b/src/sunfns.c index 6112fbae2b4..57c3e64a3a4 100644 --- a/src/sunfns.c +++ b/src/sunfns.c @@ -364,9 +364,9 @@ sun_item_create (Pair) String = Fcar(Pair); CHECK_STRING(String, 0); Value = Fcdr(Pair); - if(XTYPE(Value) == Lisp_Symbol) + if (SYMBOLP (Value)) Value = XSYMBOL(Value)->value; - if(XTYPE(Value) == Lisp_Vector) { + if (VECTORP (Value)) { submenu = sun_menu_create (Value); menu_item = menu_create_item (MENU_RELEASE, MENU_PULLRIGHT_ITEM, XSTRING(String)->data, submenu, 0); |