Pass new arg to Fread_key_sequence.
Qnil, Qnil, Qnil, Qnil);
break;
- case 'k': /* Key sequence (string) */
- args[i] = Fread_key_sequence (build_string (prompt), Qnil);
+ case 'k': /* Key sequence. */
+ args[i] = Fread_key_sequence (build_string (prompt), Qnil, Qnil);
+ teml = args[i];
+ visargs[i] = Fkey_description (teml);
+ break;
+
+ case 'K': /* Key sequence to be defined. */
+ args[i] = Fread_key_sequence (build_string (prompt), Qnil, Qt);
teml = args[i];
visargs[i] = Fkey_description (teml);
break;