Mercurial > emacs
changeset 2367:df7de9403e02
* x-win.el (x-defined-colors): Use x-color-defined-p instead of
x-defined-color.
(x-handle-geometry): Use x-parse-geometry instead of x-geometry.
| author | Jim Blandy <jimb@redhat.com> |
|---|---|
| date | Thu, 25 Mar 1993 04:39:49 +0000 |
| parents | ed9b74c46fb9 |
| children | ff45a6d7b464 |
| files | lisp/term/x-win.el |
| diffstat | 1 files changed, 4 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/term/x-win.el Thu Mar 25 04:37:38 1993 +0000 +++ b/lisp/term/x-win.el Thu Mar 25 04:39:49 1993 +0000 @@ -147,8 +147,9 @@ ;; Handle the geometry option (defun x-handle-geometry (switch) - (setq initial-frame-alist (append initial-frame-alist - (x-geometry (car x-invocation-args))) + (setq initial-frame-alist + (append initial-frame-alist + (x-parse-geometry (car x-invocation-args))) x-invocation-args (cdr x-invocation-args))) (defvar x-display-name nil @@ -418,7 +419,7 @@ (while all-colors (setq this-color (car all-colors) all-colors (cdr all-colors)) - (and (x-defined-color this-color) + (and (x-color-defined-p this-color) (setq defined-colors (cons this-color defined-colors)))) defined-colors))