[elpa] externals/company c7234a9 4/4: Merge pull request #1181 from twlz0ne/make-mode-keywords

[ELPA Syncer]

branch: externals/company
commit c7234a9df0b1a624ae0633d3a7d08f92109ff85a
Merge: 87825c7 e9e05c5
Author: Dmitry Gutov <dgutov@yandex.ru>
Commit: GitHub <noreply@github.com>

    Merge pull request #1181 from twlz0ne/make-mode-keywords
    
    Add keywords for make-mode
---
 company-keywords.el | 22 ++++++++++++++++++++++
 1 file changed, 22 insertions(+)

diff --git a/company-keywords.el b/company-keywords.el
index 0bb17ef..d9d9eb9 100644
--- a/company-keywords.el
+++ b/company-keywords.el
@@ -27,6 +27,7 @@
 
 (require 'company)
 (require 'cl-lib)
+(eval-when-compile (require 'make-mode))
 
 (defun company-keywords-upper-lower (&rest lst)
   ;; Upcase order is different for _.
@@ -297,6 +298,27 @@
     (enh-ruby-mode . ruby-mode))
   "Alist mapping major-modes to sorted keywords for `company-keywords'.")
 
+(with-eval-after-load 'make-mode
+  (mapc
+   (lambda (mode-stmnts)
+     (setf (alist-get (car mode-stmnts) company-keywords-alist)
+           (cl-remove-duplicates
+            (sort (append makefile-special-targets-list
+                          (cl-mapcan #'identity
+                                     (mapcar
+                                      #'split-string
+                                      (cl-remove-if-not
+                                       #'stringp
+                                       (symbol-value (cdr mode-stmnts))))))
+                  #'string<)
+            :test #'string=)))
+   '((makefile-automake-mode . makefile-automake-statements)
+     (makefile-gmake-mode    . makefile-gmake-statements)
+     (makefile-makepp-mode   . makefile-makepp-statements)
+     (makefile-bsdmake-mode  . makefile-bsdmake-statements)
+     (makefile-imake-mode    . makefile-statements)
+     (makefile-mode          . makefile-statements))))
+
 ;;;###autoload
 (defun company-keywords (command &optional arg &rest ignored)
   "`company-mode' backend for programming language keywords."