diff options
| author | Thierry Volpiatto <thierry.volpiatto@gmail.com> | 2015-08-03 08:12:04 +0200 |
|---|---|---|
| committer | Thierry Volpiatto <thierry.volpiatto@gmail.com> | 2015-08-03 08:12:04 +0200 |
| commit | 79e5249fe2e7f7b1079a76a38ae2f2ee473eb9bc (patch) | |
| tree | 17e85f61bbaa8079244312b9b235543d89863f1c /helm-files.el | |
| parent | 576cc21f381977e1d3c509d94f73853a74612cff (diff) | |
Don't hardcode C-l in *find-files doc header (#1120).
* helm-files.el (helm-find-files-doc-header): Do it.
(helm-source-ffiles): Use substitute-command-keys.
Diffstat (limited to 'helm-files.el')
| -rw-r--r-- | helm-files.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/helm-files.el b/helm-files.el index 5bdc262a..098eed01 100644 --- a/helm-files.el +++ b/helm-files.el @@ -382,7 +382,7 @@ I.e use the -path/ipath arguments of find instead of -name/iname." ;; Internal. -(defvar helm-find-files-doc-header " (`C-l': Go up one level)" +(defvar helm-find-files-doc-header " (\\<helm-find-files-map>\\[helm-find-files-up-one-level]: Go up one level)" "*The doc that is inserted in the Name header of a find-files or dired source.") (defvar helm-ff-auto-update-flag nil "Internal, flag to turn on/off auto-update in `helm-find-files'. @@ -461,7 +461,8 @@ Should not be used among other sources.") (defclass helm-source-ffiles (helm-source-sync) ((header-name :initform (lambda (name) - (concat name helm-find-files-doc-header))) + (concat name (substitute-command-keys + helm-find-files-doc-header)))) (init :initform (lambda () (setq helm-ff-auto-update-flag |