branch: elpa/helm
commit e48f65bc7e68691252889a4b55d6b6fa7f490001
Author: Thierry Volpiatto <thie...@posteo.net>
Commit: Thierry Volpiatto <thie...@posteo.net>
Move helm-read-file-dummy-map to helm-files to avoid errors
with lynx style setting.
---
helm-files.el | 7 +++++++
helm-mode.el | 6 ------
2 files changed, 7 insertions(+), 6 deletions(-)
diff --git a/helm-files.el b/helm-files.el
index 585de8b4d1..2ad17d4ddf 100644
--- a/helm-files.el
+++ b/helm-files.el
@@ -304,6 +304,13 @@ It is the source handling new file or directory in
`helm-find-files'.")
nil 'helm-ff-delete-char-backward--exit-fn)
map)
"Keymap for `helm-read-file-name'.")
+
+(defvar helm-read-file-dummy-map
+ (let ((map (make-sparse-keymap)))
+ (set-keymap-parent map helm-map)
+ (define-key map (kbd "C-l") 'helm-find-files-up-one-level)
+ map)
+ "Keymap for `helm-read-file-name' dummy source.")
;;; User variables
;;
diff --git a/helm-mode.el b/helm-mode.el
index ef6fbb9c16..4b30576f11 100644
--- a/helm-mode.el
+++ b/helm-mode.el
@@ -1891,12 +1891,6 @@ See documentation of `completing-read' and
`all-completions' for details."
;;; Generic read-file-name
;;
;;
-(defvar helm-read-file-dummy-map
- (let ((map (make-sparse-keymap)))
- (set-keymap-parent map helm-map)
- (define-key map (kbd "C-l") 'helm-find-files-up-one-level)
- map))
-
;;;###autoload
(cl-defun helm-read-file-name
(prompt
