diff options
| author | Karl Heuer | 1994-09-27 01:21:05 +0000 |
|---|---|---|
| committer | Karl Heuer | 1994-09-27 01:21:05 +0000 |
| commit | b442163d0dfd0b6e1c391ea0c0adf5cba67162bd (patch) | |
| tree | 11a83b5efde28d0d700e0d292258702f36376b64 /src/sunfns.c | |
| parent | 330cf232bf8812bfe96238bcd62ff75699ed9601 (diff) | |
| download | emacs-b442163d0dfd0b6e1c391ea0c0adf5cba67162bd.tar.gz emacs-b442163d0dfd0b6e1c391ea0c0adf5cba67162bd.zip | |
(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) | |||
| 364 | String = Fcar(Pair); | 364 | String = Fcar(Pair); |
| 365 | CHECK_STRING(String, 0); | 365 | CHECK_STRING(String, 0); |
| 366 | Value = Fcdr(Pair); | 366 | Value = Fcdr(Pair); |
| 367 | if(XTYPE(Value) == Lisp_Symbol) | 367 | if (SYMBOLP (Value)) |
| 368 | Value = XSYMBOL(Value)->value; | 368 | Value = XSYMBOL(Value)->value; |
| 369 | if(XTYPE(Value) == Lisp_Vector) { | 369 | if (VECTORP (Value)) { |
| 370 | submenu = sun_menu_create (Value); | 370 | submenu = sun_menu_create (Value); |
| 371 | menu_item = menu_create_item | 371 | menu_item = menu_create_item |
| 372 | (MENU_RELEASE, MENU_PULLRIGHT_ITEM, XSTRING(String)->data, submenu, 0); | 372 | (MENU_RELEASE, MENU_PULLRIGHT_ITEM, XSTRING(String)->data, submenu, 0); |