Fix typo calling iso-accents-customize.

(iso-accents-compose): If this-command is non-nil, do prompt.

diff --git a/lisp/international/iso-acc.el b/lisp/international/iso-acc.el
index bbd6e5f52e4e04a2970c39c4174d5d2def5f14e6..8e877a1e3496b8e7699b7212de64d38c99117836 100644 (file)
--- a/lisp/international/iso-acc.el
+++ b/lisp/international/iso-acc.el
@@ -156,7 +156,9 @@ See the function `iso-accents-mode'.")
         ;; 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 @@ Noninteractively, this operates on text from START to END."
                (insert (car (cdr (car entry)))))
            (forward-char 1)))))))
 
-(iso-customize-accents "default")
+(iso-accents-customize "default")
 
 ;;; iso-acc.el ends here