comparison src/keymap.c @ 37930:ee47b5c14208

(Fsingle_key_description): Create a multibyte string only if necessary.

37929:ca726d19c1be

	  CHECK_STRING (name, 0);
	  return concat2 (build_string ("Character set "), name);
	}
      else
	{
	  char tem[KEY_DESCRIPTION_SIZE];
	  int len;

	  *push_key_description (XUINT (key), tem, 1) = 0;
	  len = strlen (tem);
	  return make_multibyte_string (tem,
					multibyte_chars_in_text (tem, len),
					len);
	}
    }
  else if (SYMBOLP (key))	/* Function key or event-symbol */
    {
      if (NILP (no_angles))

37930:ee47b5c14208

	  CHECK_STRING (name, 0);
	  return concat2 (build_string ("Character set "), name);
	}
      else
	{
	  char tem[KEY_DESCRIPTION_SIZE], *end;
	  int nbytes, nchars;
	  Lisp_Object string;

	  end = push_key_description (XUINT (key), tem, 1);
	  nbytes = end - tem;
	  nchars = multibyte_chars_in_text (tem, nbytes);
	  if (nchars == nbytes)
	    string = build_string (tem);
	  else
	    string = make_multibyte_string (tem, nchars, nbytes);
	  return string;
	}
    }
  else if (SYMBOLP (key))	/* Function key or event-symbol */
    {
      if (NILP (no_angles))