diff options
| author | Richard M. Stallman | 1995-11-10 17:40:47 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1995-11-10 17:40:47 +0000 |
| commit | beb4ba68757a1b71de4885f7c890af52f9bfa710 (patch) | |
| tree | 28f88bbcff4434d0d98d5415b0799c1b03eb90d0 | |
| parent | 0b574c357f10377efd48872ca1b0822ae5f92171 (diff) | |
| download | emacs-beb4ba68757a1b71de4885f7c890af52f9bfa710.tar.gz emacs-beb4ba68757a1b71de4885f7c890af52f9bfa710.zip | |
(x-display-color-p): Accept optional arg.
| -rw-r--r-- | lisp/term/pc-win.el | 2 |
1 files changed, 1 insertions, 1 deletions
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 @@ | |||
| 108 | ;; a useful function for returning 'nil regardless of argument. | 108 | ;; a useful function for returning 'nil regardless of argument. |
| 109 | 109 | ||
| 110 | ;; From src/xfns.c | 110 | ;; From src/xfns.c |
| 111 | (defun x-display-color-p () 't) | 111 | (defun x-display-color-p (&optional display) 't) |
| 112 | (fset 'focus-frame 'ignore) | 112 | (fset 'focus-frame 'ignore) |
| 113 | (fset 'unfocus-frame 'ignore) | 113 | (fset 'unfocus-frame 'ignore) |
| 114 | (defun x-list-fonts (pattern &optional face frame) (list "default")) | 114 | (defun x-list-fonts (pattern &optional face frame) (list "default")) |