[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
bug#10191: dired-query (in dired-aux.el) fails for certain help-char's,
From: |
Stefan Monnier |
Subject: |
bug#10191: dired-query (in dired-aux.el) fails for certain help-char's, Emacs 23 and 24 |
Date: |
Fri, 02 Dec 2011 09:18:35 -0500 |
User-agent: |
Gnus/5.13 (Gnus v5.13) Emacs/24.0.91 (gnu/linux) |
> ; original
> (if help-form
> (format " [Type yn!q or %s] "
> (key-description
> (char-to-string help-char)))
> " [Type y, n, q or !] ")
> When (characterp help-char) is nil, as in my case, char-to-string raises an
> error.
Thanks. I've installed the patch below which should fix your problem,
Stefan
=== modified file 'lisp/dired-aux.el'
--- lisp/dired-aux.el 2011-11-17 09:09:20 +0000
+++ lisp/dired-aux.el 2011-12-02 14:14:09 +0000
@@ -927,8 +927,7 @@
(concat (apply 'format prompt args)
(if help-form
(format " [Type yn!q or %s] "
- (key-description
- (char-to-string help-char)))
+ (key-description (vector help-char)))
" [Type y, n, q or !] ")))
(set sym (setq char (read-char-choice prompt char-choices)))
(if (memq char '(?y ?\s ?!)) t)))))