[nongnu] elpa/iedit b5a3415b00 180/301: Merge pull request #47 from zhenya1007/help-char-can-be-meta

[ELPA Syncer]

branch: elpa/iedit
commit b5a3415b00dd24be9c6c720a6b10d13481e9fc42
Merge: b95c35107a 6c6522c7e9
Author: victorhge <victorhge@gmail.com>
Commit: victorhge <victorhge@gmail.com>

    Merge pull request #47 from zhenya1007/help-char-can-be-meta
    
    Minor bugfix: `help-char' need not be acceptable to `char-to-string'.
---
 iedit.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/iedit.el b/iedit.el
index c71eee3720..67eb5fda5d 100644
--- a/iedit.el
+++ b/iedit.el
@@ -161,7 +161,7 @@ An example of how to use this variable: todo")
 
 (defvar iedit-help-map
   (let ((map (make-sparse-keymap)))
-    (define-key map (char-to-string help-char) 'iedit-help-for-help)
+    (define-key map (vector (event-convert-list `(,help-char))) 
'iedit-help-for-help)
     (define-key map [help] 'iedit-help-for-help)
     (define-key map [f1] 'iedit-help-for-help)
     (define-key map "?" 'iedit-help-for-help)
@@ -246,7 +246,7 @@ This is like `describe-bindings', but displays only Iedit 
keys."
 (defvar iedit-mode-keymap
   (let ((map (make-sparse-keymap)))
     (set-keymap-parent map iedit-lib-keymap)
-    (define-key map (char-to-string help-char) iedit-help-map)
+    (define-key map (vector (event-convert-list `(,help-char))) iedit-help-map)
     (define-key map [help] iedit-help-map)
     (define-key map [f1] iedit-help-map)
     (define-key map (kbd "M-;") 'iedit-toggle-selection)