Mercurial > emacs

changeset 13136:b37ba01d6e27

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fix typo calling iso-accents-customize. (iso-accents-compose): If this-command is non-nil, do prompt.
author Richard M. Stallman <rms@gnu.org>
date Fri, 06 Oct 1995 15:12:44 +0000
parents d619c5216f7d
children a83a1515fd9b
files lisp/international/iso-acc.el
diffstat 1 files changed, 4 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/international/iso-acc.el	Fri Oct 06 04:36:30 1995 +0000
+++ b/lisp/international/iso-acc.el	Fri Oct 06 15:12:44 1995 +0000
@@ -156,7 +156,9 @@
 	 ;; Wait for the second key and look up the combination.
 	 (second-char (if (or prompt
 			      (not (eq (key-binding "a")
-				       'self-insert-command)))
+				       'self-insert-command))
+			      ;; Called from anything but the command loop.
+			      this-command)
 			  (progn
 			    (message "%s%c"
 				     (or prompt "Compose with ")
@@ -316,7 +318,7 @@
 		(insert (car (cdr (car entry)))))
 	    (forward-char 1)))))))
 
-(iso-customize-accents "default")
+(iso-accents-customize "default")
 
 ;;; iso-acc.el ends here