Ar an seachtú lá déag de mí Eanair, scríobh Julian Bradfield: This is most relevant if you ever use the prefix argument to #'self-insert-command: (defun generate-self-insert-command-for-character (character) "Given CHARACTER, return a command that calls `self-insert-command' with it." (check-argument-type #'characterp character) (lexical-let ((character character)) (lambda (&optional count) "Call `self-insert-command' with a given value for `last-command-char'." (interactive "*p") (let ((last-command-char character)) (self-insert-command (or count 1)))))) (define-key compose-map [?d ?h] (generate-self-insert-command-for-character ?\xf0)) I’m not sure that the multi-key binding for compose-map is always available in the TTY, though; my understanding was that it was X11-conditional code that put it in place. If you’ve bound it to something explicitly then that doesn’t matter, of course. -- ¿Dónde estará ahora mi sobrino Yoghurtu Nghe, que tuvo que huir precipitadamente de la aldea por culpa de la escasez de rinocerontes? _______________________________________________ XEmacs-Beta mailing list XEmacs-Beta(a)xemacs.org http://calypso.tux.org/cgi-bin/mailman/listinfo/xemacs-beta