mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-23 08:20:41 -08:00
Code Issues Projects Releases Wiki Activity

* emacs-lisp/chart.el (x-display-color-cells): Declare.

Browse source 
(chart-face-list): Drop Emacsen without display-color-p.
This commit is contained in:
Glenn Morris 2013-09-17 22:04:41 -07:00
parent 74be3de16c
commit 7bb3e76899
2 changed files with 8 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

3
lisp/ChangeLog
View file

@ -1,5 +1,8 @@
2013-09-18 Glenn Morris <rgm@gnu.org>
* 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.

10
lisp/emacs-lisp/chart.el
View file

@ -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 <zappo@gnu.org>
;; Version: 0.2
@ -86,10 +86,10 @@ Useful if new Emacs is used on B&W display.")
: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 ())