From: Richard M. Stallman <rms@gnu.org>
Date: Fri, 10 Nov 1995 17:40:47 +0000 (+0000)
Subject: (x-display-color-p): Accept optional arg.
X-Git-Tag: emacs-19.34~2376
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=beb4ba68757a1b71de4885f7c890af52f9bfa710;p=emacs.git

(x-display-color-p): Accept optional arg.
---

diff --git a/lisp/term/pc-win.el b/lisp/term/pc-win.el
index 12d3f152058..8e888c674b4 100644
--- a/lisp/term/pc-win.el
+++ b/lisp/term/pc-win.el
@@ -108,7 +108,7 @@
 ;; a useful function for returning 'nil regardless of argument.
 
 ;; From src/xfns.c
-(defun x-display-color-p () 't)
+(defun x-display-color-p (&optional display) 't)
 (fset 'focus-frame 'ignore)
 (fset 'unfocus-frame 'ignore)
 (defun x-list-fonts (pattern &optional face frame) (list "default"))