[elpa] elpa eb9986d 46/51: Respect both "xcolor" and "color" for query to "shadecolor"

[Tassilo Horn]

branch: elpa
commit eb9986d4bade931e075472b15bb5889e2c970fc5
Author: Arash Esbati <address@hidden>
Commit: Mosè Giordano <address@hidden>

    Respect both "xcolor" and "color" for query to "shadecolor"
    
    * style/ntheorem.el ("ntheorem"): Respect both "xcolor" and
    "color" for query to "shadecolor" command.
    
    Signed-off-by: Mosè Giordano <address@hidden>
---
 style/ntheorem.el |    8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/style/ntheorem.el b/style/ntheorem.el
index 068f40d..2cfd4f5 100644
--- a/style/ntheorem.el
+++ b/style/ntheorem.el
@@ -1,6 +1,6 @@
 ;;; ntheorem.el --- AUCTeX style for `ntheorem.sty' (v1.33)
 
-;; Copyright (C) 2015 Free Software Foundation, Inc.
+;; Copyright (C) 2015, 2016 Free Software Foundation, Inc.
 
 ;; Author: Arash Esbati <esbati'at'gmx.de>
 ;; Maintainer: address@hidden
@@ -289,8 +289,10 @@ make them available as new environments.  Update
       (TeX-arg-eval
        (lambda ()
         (let ((color
-               (if (fboundp 'LaTeX-color-definecolor-list)
-                   (completing-read "color: " (LaTeX-color-definecolor-list))
+               (if (or (member "xcolor" (TeX-style-list))
+                       (member "color" (TeX-style-list)))
+                   (completing-read "color: " (or 
(LaTeX-xcolor-definecolor-list)
+                                                  
(LaTeX-color-definecolor-list)))
                  (TeX-read-string "color: "))))
           (format "%s" color)))))