diff options
| author | Stefan Kangas <stefankangas@gmail.com> | 2022-09-18 18:55:19 +0200 |
|---|---|---|
| committer | Stefan Kangas <stefankangas@gmail.com> | 2022-09-18 18:55:19 +0200 |
| commit | 1bdac41e4d9bbc23b654b90d593a8a3588052868 (patch) | |
| tree | 01a445936ed086bd090798ce87443fefa2c6f589 /src/dbusbind.c | |
| parent | e27d9a46dc585051d938a6506dc1c7d1e055f3c5 (diff) | |
| download | emacs-1bdac41e4d9bbc23b654b90d593a8a3588052868.tar.gz | |
Prefer using DEFSYMs to intern with wrong_type_argument
* src/data.c (syms_of_data) <Qbooleanp>:
* src/fileio.c (syms_of_fileio) <Qinserted_chars, Qfile_offset>:
* src/font.c (syms_of_font) <Qfont_extra_type>: New DEFSYMs.
* src/dbusbind.c (xd_signature, xd_append_arg):
* src/fileio.c (file_offset, Finsert_file_contents):
* src/font.c (Ffontp): Prefer using above new DEFSYMs to using intern
directly.
Diffstat (limited to 'src/dbusbind.c')
| -rw-r--r-- | src/dbusbind.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/dbusbind.c b/src/dbusbind.c index 943a4aff8e7..1c74180f15c 100644 --- a/src/dbusbind.c +++ b/src/dbusbind.c @@ -398,7 +398,7 @@ xd_signature (char *signature, int dtype, int parent_type, Lisp_Object object) case DBUS_TYPE_BOOLEAN: /* There must be an argument. */ if (EQ (QCboolean, object)) - wrong_type_argument (intern ("booleanp"), object); + wrong_type_argument (Qbooleanp, object); sprintf (signature, "%c", dtype); break; @@ -649,7 +649,7 @@ xd_append_arg (int dtype, Lisp_Object object, DBusMessageIter *iter) case DBUS_TYPE_BOOLEAN: /* There must be an argument. */ if (EQ (QCboolean, object)) - wrong_type_argument (intern ("booleanp"), object); + wrong_type_argument (Qbooleanp, object); { dbus_bool_t val = (NILP (object)) ? FALSE : TRUE; XD_DEBUG_MESSAGE ("%c %s", dtype, (val == FALSE) ? "false" : "true"); |