Mercurial > emacs

comparison lisp/frame.el @ 10601:b357feae0096

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(frame-notice-user-settings): Avoid having the window manager re-prompt for the initial frame's clone.
author Karl Heuer <kwzh@gnu.org>
date Mon, 30 Jan 1995 23:47:17 +0000
parents 132a846eba8e
children f93c3156e05a
comparison
equal deleted inserted replaced
10600:45bbb119e1a3 10601:b357feae0096
259 (setq parms (frame-delete-all 'top parms))) 259 (setq parms (frame-delete-all 'top parms)))
260 (setq new 260 (setq new
261 (make-frame 261 (make-frame
262 ;; Use the geometry args that created the existing 262 ;; Use the geometry args that created the existing
263 ;; frame, rather than the parms we get for it. 263 ;; frame, rather than the parms we get for it.
264 (append frame-initial-geometry-arguments parms))) 264 (append frame-initial-geometry-arguments
265 '((user-size . t) (user-position . t))
266 parms)))
265 ;; The initial frame, which we are about to delete, may be 267 ;; The initial frame, which we are about to delete, may be
266 ;; the only frame with a minibuffer. If it is, create a 268 ;; the only frame with a minibuffer. If it is, create a
267 ;; new one. 269 ;; new one.
268 (or (delq frame-initial-frame (minibuffer-frame-list)) 270 (or (delq frame-initial-frame (minibuffer-frame-list))
269 (make-frame (append minibuffer-frame-alist 271 (make-frame (append minibuffer-frame-alist