[elpa] externals/company b4145d3 4/4: Merge pull request #1085 from jcs-PR/icon

[ELPA Syncer]

branch: externals/company
commit b4145d3e23c976f51a7d511d68e15af38ce050fd
Merge: b8224f2 061d2a2
Author: Dmitry Gutov <dgutov@yandex.ru>
Commit: GitHub <noreply@github.com>

    Merge pull request #1085 from jcs-PR/icon
    
    Add choices, tty, detect
---
 company.el | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/company.el b/company.el
index 08d30a3..7f02140 100644
--- a/company.el
+++ b/company.el
@@ -1451,7 +1451,7 @@ end of the match."
                                 candidate
                                 selected))
 
-(defvar company-text-icons-mapping
+(defcustom company-text-icons-mapping
   '((array . "Α")
     (boolean . "β")
     (class . "γ")
@@ -1478,7 +1478,9 @@ end of the match."
     (snippet . "υ")
     (string . "φ")
     (struct . "Χ")
-    (variable . "ѱ")))
+    (variable . "ѱ"))
+  "Mapping of the text icons."
+  :type 'list)
 
 (defun company-text-icons-margin (candidate selected)
   "Margin function which returns unicode icons."
@@ -1506,6 +1508,8 @@ image for the returned kind image. Function is called 
with (nil nil) to get
 the default margin."
   :type '(choice
           (const :tag "Disabled" nil)
+          (const :tag "Detect icons theme base on conditions" 
company-detect-icons-margin)
+          (const :tag "TTY icons theme" company-text-icons-margin)
           (const :tag "VScode dark icons theme" 
company-vscode-dark-icons-margin)
           (const :tag "VScode light icons theme" 
company-vscode-light-icons-margin)
           (function :tag "Custom icon function.")))