[elpa] master 0d2757c 56/66: company-search-map: Add M-n and M-p bindings

[Dmitry Gutov]

branch: master
commit 0d2757c4652c308c2cbc25989c0ccc20faa6529f
Author: Dmitry Gutov <address@hidden>
Commit: Dmitry Gutov <address@hidden>

    company-search-map: Add M-n and M-p bindings
---
 NEWS.md    |    1 +
 company.el |    2 ++
 2 files changed, 3 insertions(+), 0 deletions(-)

diff --git a/NEWS.md b/NEWS.md
index 9d3c103..40d654e 100644
--- a/NEWS.md
+++ b/NEWS.md
@@ -2,6 +2,7 @@
 
 ## Next
 
+* Pressing `M-n` or `M-p` doesn't quit the search mode.
 * New command `company-complete-common-or-cycle`. No default binding, so one
   would have to set it up to use it.
 * `company-search-toggle-filtering` replaced `company-search-kill-others`.
diff --git a/company.el b/company.el
index 2d1c9d1..b71b0f3 100644
--- a/company.el
+++ b/company.el
@@ -1701,6 +1701,8 @@ from the rest of the back-ends in the group, if any, will 
be left at the end."
       (define-key keymap (char-to-string meta-prefix-char) meta-map)
       (define-key keymap [escape] meta-map))
     (define-key keymap (vector meta-prefix-char t) 'company-search-other-char)
+    (define-key keymap (kbd "M-n") 'company-select-next)
+    (define-key keymap (kbd "M-p") 'company-select-previous)
     (define-key keymap "\e\e\e" 'company-search-other-char)
     (define-key keymap [escape escape escape] 'company-search-other-char)
     (define-key keymap (kbd "DEL") 'company-search-delete-char)