[Emacs-diffs] trunk r114369: * emacs-lisp/chart.el (x-display-color-cells): Declare.

[Glenn Morris]

------------------------------------------------------------
revno: 114369
revision-id: address@hidden
parent: address@hidden
committer: Glenn Morris <address@hidden>
branch nick: trunk
timestamp: Tue 2013-09-17 22:04:41 -0700
message:
  * emacs-lisp/chart.el (x-display-color-cells): Declare.
  (chart-face-list): Drop Emacsen without display-color-p.
modified:
  lisp/ChangeLog                 changelog-20091113204419-o5vbwnq5f7feedwu-1432
  lisp/emacs-lisp/chart.el       chart.el-20091113204419-o5vbwnq5f7feedwu-10967

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2013-09-18 04:53:05 +0000
+++ b/lisp/ChangeLog    2013-09-18 05:04:41 +0000
@@ -1,5 +1,8 @@
 2013-09-18  Glenn Morris  <address@hidden>
 
+       * emacs-lisp/chart.el (x-display-color-cells): Declare.
+       (chart-face-list): Drop Emacsen without display-color-p.
+
        * net/eww.el (libxml-parse-html-region): Declare.
        (eww-display-html): Explicit error if no libxml2 support.
 

=== modified file 'lisp/emacs-lisp/chart.el'
--- a/lisp/emacs-lisp/chart.el  2013-05-24 06:59:13 +0000
+++ b/lisp/emacs-lisp/chart.el  2013-09-18 05:04:41 +0000
@@ -1,7 +1,7 @@
 ;;; chart.el --- Draw charts (bar charts, etc)  -*- lexical-binding: t -*-
 
-;; Copyright (C) 1996, 1998-1999, 2001, 2004-2005, 2007-2013 Free
-;; Software Foundation, Inc.
+;; Copyright (C) 1996, 1998-1999, 2001, 2004-2005, 2007-2013
+;;   Free Software Foundation, Inc.
 
 ;; Author: Eric M. Ludlam  <address@hidden>
 ;; Version: 0.2
@@ -86,10 +86,10 @@
   :group 'eieio
   :type 'boolean)
 
+(declare-function x-display-color-cells "xfns.c" (&optional terminal))
+
 (defvar chart-face-list
-  (if (if (fboundp 'display-color-p)
-          (display-color-p)
-        window-system)
+  (if (display-color-p)
       (let ((cl chart-face-color-list)
             (pl chart-face-pixmap-list)
             (faces ())