Mercurial > hg > xemacs-beta

comparison src/cmds.c @ 2828:a25c824ed558

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2005-06-26 18:04:49 by aidan] Rename the ascii-character property, support more keysyms.
author aidan
date Sun, 26 Jun 2005 18:05:05 +0000
parents 79c6ff3eef26
children b95fe16005fd
comparison
equal deleted inserted replaced
2827:936a6576c655 2828:a25c824ed558
337 n = XINT (count); 337 n = XINT (count);
338 338
339 if (CHAR_OR_CHAR_INTP (Vlast_command_char)) 339 if (CHAR_OR_CHAR_INTP (Vlast_command_char))
340 c = Vlast_command_char; 340 c = Vlast_command_char;
341 else 341 else
342 c = Fevent_to_character (Vlast_command_event, Qnil, Qnil, Qt); 342 c = Fevent_to_character (Vlast_command_event, Qnil, Qnil);
343 343
344 if (NILP (c)) 344 if (NILP (c))
345 invalid_operation ("Last typed character has no ASCII equivalent", 345 invalid_operation (
346 Fcopy_event (Vlast_command_event, Qnil)); 346 "Last typed key has no character equivalent (that we know of)",
347 Fcopy_event (Vlast_command_event, Qnil));
347 348
348 CHECK_CHAR_COERCE_INT (c); 349 CHECK_CHAR_COERCE_INT (c);
349 350
350 ch = XCHAR (c); 351 ch = XCHAR (c);
351 352