summaryrefslogtreecommitdiff
path: root/lisp/frame.el
diff options
context:
space:
mode:
authorJuanma Barranquero <lekktu@gmail.com>2003-04-10 16:31:00 +0000
committerJuanma Barranquero <lekktu@gmail.com>2003-04-10 16:31:00 +0000
commit7418081f483420a7e009584f0053665a7ece9b97 (patch)
treefe6f8d939cf8bff0cebeb92d176e9c2e57b4a013 /lisp/frame.el
parent84b538ecf878ffa02dc9bb01c799ac49efea48d8 (diff)
downloademacs-7418081f483420a7e009584f0053665a7ece9b97.tar.gz
(modify-all-frames-parameters): Deleted.
Diffstat (limited to 'lisp/frame.el')
-rw-r--r--lisp/frame.el19
1 files changed, 0 insertions, 19 deletions
diff --git a/lisp/frame.el b/lisp/frame.el
index 92c8ba8cfd1..d67e4f42d30 100644
--- a/lisp/frame.el
+++ b/lisp/frame.el
@@ -505,25 +505,6 @@ React to settings of `default-frame-alist', `initial-frame-alist' there."
;;;; Creation of additional frames, and other frame miscellanea
-(defun modify-all-frames-parameters (alist)
- "Modify all current and future frames parameters according to ALIST.
-This changes `default-frame-alist' and possibly `initial-frame-alist'.
-See help of `modify-frame-parameters' for more information."
- (let (element) ;; temp
- (dolist (frame (frame-list))
- (modify-frame-parameters frame alist))
- (dolist (pair alist) ;; conses to add/replace
- ;; initial-frame-alist needs setting only when
- ;; frame-notice-user-settings is true
- (and frame-notice-user-settings
- (setq element (assoc (car pair) initial-frame-alist))
- (setq initial-frame-alist (delq element initial-frame-alist)))
- (and (setq element (assoc (car pair) default-frame-alist))
- (setq default-frame-alist (delq element default-frame-alist)))))
- (and frame-notice-user-settings
- (setq initial-frame-alist (append initial-frame-alist alist)))
- (setq default-frame-alist (append default-frame-alist alist)))
-
(defun get-other-frame ()
"Return some frame other than the current frame.
Create one if necessary. Note that the minibuffer frame, if separate,