Merge master into feature/improved-locked-narrowing.

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");