Allow non-printing keys like in avy

Adapt so that the feature of https://github.com/abo-abo/avy/pull/77 can be used here, too.
11 years ago · f786679f89
parent 55221b096a
commit f786679f89
1 changed files with 2 additions and 2 deletions
--- a/ace-window.el
+++ b/ace-window.el
@ -200,9 +200,9 @@ LEAF is (PT . WND)."
              (concat
               (cl-case aw-leading-char-style
                 (char
-                  (apply #'string (last path)))
+                  (string (avy--key-to-char (car (last path)))))
                 (path
-                  (apply #'string (reverse path)))
+		  (mapconcat #'avy--key-to-char (reverse path) ""))
                 (t
                  (error "Bad `aw-leading-char-style': %S"
                         aw-leading-char-style)))