lisp/frame.el (make-frame): Use the cdr of the value returned by assq.
By ARISAWA Akihiro (<ari@mbf.ocn.ne.jp>).
git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-180
The following is an (incomplete) list of people who have contributed
to the project by testing, bug reports, and suggestions. Thanks!
+ARISAWA Akihiro <ari at mbf dot ocn dot ne dot jp>
Robert J. Chassell <bob at rattlesnake dot com>
Romain Francoise <romain at orebokech dot com>
Ami Fischman <ami at fischman dot org>
(error "Don't know how to create a frame on window system %s" w))
(run-hooks 'before-make-frame-hook)
(setq frame (funcall frame-creation-function parameters))
- (modify-frame-parameters frame (assq w window-system-default-frame-alist))
+ (modify-frame-parameters frame
+ (cdr (assq w window-system-default-frame-alist)))
(run-hook-with-args 'after-make-frame-functions frame)
frame))