From beb4ba68757a1b71de4885f7c890af52f9bfa710 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Fri, 10 Nov 1995 17:40:47 +0000 Subject: [PATCH] (x-display-color-p): Accept optional arg. --- lisp/term/pc-win.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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")) -- 2.39.2