* src/fns.c (Fmapconcat): Faster fast-path condition

2025-02-19 19:57:16 +01:00
parent 241e8e5fcf
commit b481fbe92f
1 changed files with 1 additions and 1 deletions
--- a/src/fns.c
+++ b/src/fns.c
@@ -3450,7 +3450,7 @@ FUNCTION must be a function of one argument, and must return a value
    return empty_unibyte_string;
  Lisp_Object *args;
  SAFE_ALLOCA_LISP (args, args_alloc);
-  if (EQ (function, Qidentity))
+  if (BASE_EQ (function, Qidentity))
    {
      /* Fast path when no function call is necessary.  */
      if (CONSP (sequence))