From: Jan D Date: Wed, 25 Aug 2010 06:53:55 +0000 (+0200) Subject: * menu-bar.el (menu-bar-set-tool-bar-position): Set frame parameter on all frames. X-Git-Tag: emacs-pretest-24.0.90~104^2~275^2~438^2~48^2~238^2 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a0c16be48f9f2678e766ce31b0b47f99ce893568;p=emacs.git * menu-bar.el (menu-bar-set-tool-bar-position): Set frame parameter on all frames. --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index ffbd38561f9..3537a8dd0ff 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2010-08-25 Jan Djärv + + * menu-bar.el (menu-bar-set-tool-bar-position): Set frame parameter + on all frames. + 2010-08-24 Vinicius Jose Latorre * whitespace.el: Allow cleaning up blanks without blank diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el index ed5c189252b..98cb061cccb 100644 --- a/lisp/menu-bar.el +++ b/lisp/menu-bar.el @@ -970,7 +970,8 @@ mail status in mode line")) (defun menu-bar-set-tool-bar-position (position) (customize-set-variable 'tool-bar-mode t) - (set-frame-parameter nil 'tool-bar-position position) + (dolist (frame (frame-list)) + (set-frame-parameter frame 'tool-bar-position position)) (customize-set-variable 'default-frame-alist (cons (cons 'tool-bar-position position) (assq-delete-all 'tool-bar-position