Mercurial > emacs

comparison lisp/frame.el @ 3764:d965878f294f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
* frame.el (set-frame-configuration): Don't try to set a frame's minibuffer. This parameter can't be changed, so that would signal an error.
author Jim Blandy <jimb@redhat.com>
date Wed, 16 Jun 1993 21:24:11 +0000
parents cf5972f69f8a
children dcf86f82f2c8
comparison
equal deleted inserted replaced
3763:c58fb240170d 3764:d965878f294f
349 (mapcar (function 349 (mapcar (function
350 (lambda (frame) 350 (lambda (frame)
351 (let ((parameters (assq frame config-alist))) 351 (let ((parameters (assq frame config-alist)))
352 (if parameters 352 (if parameters
353 (progn 353 (progn
354 (modify-frame-parameters frame (nth 1 parameters)) 354 (modify-frame-parameters
355 frame
356 ;; Since we can't set a frame's minibuffer status,
357 ;; we might as well omit the parameter altogether.
358 (let* ((parms (nth 1 parameters))
359 (mini (assq 'minibuffer parms)))
360 (if mini (setq parms (delq mini parms)))
361 parms))
355 (set-window-configuration (nth 2 parameters))) 362 (set-window-configuration (nth 2 parameters)))
356 (setq frames-to-delete (cons frame frames-to-delete)))))) 363 (setq frames-to-delete (cons frame frames-to-delete))))))
357 (frame-list)) 364 (frame-list))
358 (mapcar 'delete-frame frames-to-delete))) 365 (mapcar 'delete-frame frames-to-delete)))
359 366