[Emacs-diffs] /srv/bzr/emacs/trunk r101187: * menu-bar.el (menu-bar-set-tool-bar-position): Set frame parameter on all frames.

[Jan D]

------------------------------------------------------------
revno: 101187
committer: Jan D <address@hidden>
branch nick: trunk
timestamp: Wed 2010-08-25 08:53:55 +0200
message:
  * menu-bar.el (menu-bar-set-tool-bar-position): Set frame parameter on all 
frames.
modified:
  lisp/ChangeLog
  lisp/menu-bar.el

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2010-08-25 02:27:58 +0000
+++ b/lisp/ChangeLog    2010-08-25 06:53:55 +0000
@@ -1,3 +1,8 @@
+2010-08-25  Jan Djärv  <address@hidden>
+
+       * menu-bar.el (menu-bar-set-tool-bar-position): Set frame parameter
+       on all frames.
+
 2010-08-24  Vinicius Jose Latorre  <address@hidden>
 
        * whitespace.el: Allow cleaning up blanks without blank

=== modified file 'lisp/menu-bar.el'
--- a/lisp/menu-bar.el  2010-08-22 20:02:16 +0000
+++ b/lisp/menu-bar.el  2010-08-25 06:53:55 +0000
@@ -970,7 +970,8 @@
 
 (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