diff options
| author | Jan D <jan.h.d@swipnet.se> | 2010-08-25 08:53:55 +0200 |
|---|---|---|
| committer | Jan D <jan.h.d@swipnet.se> | 2010-08-25 08:53:55 +0200 |
| commit | a0c16be48f9f2678e766ce31b0b47f99ce893568 (patch) | |
| tree | c77c150a8087bad5405ac03c550a6f16afbacd61 | |
| parent | 9bbaf4b01d0c95215fca22d2808ed0dd5466cae1 (diff) | |
| download | emacs-a0c16be48f9f2678e766ce31b0b47f99ce893568.tar.gz emacs-a0c16be48f9f2678e766ce31b0b47f99ce893568.tar.bz2 emacs-a0c16be48f9f2678e766ce31b0b47f99ce893568.zip | |
* menu-bar.el (menu-bar-set-tool-bar-position): Set frame parameter on all frames.
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/menu-bar.el | 3 |
2 files changed, 7 insertions, 1 deletions
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 <jan.h.d@swipnet.se> + + * menu-bar.el (menu-bar-set-tool-bar-position): Set frame parameter + on all frames. + 2010-08-24 Vinicius Jose Latorre <viniciusjl@ig.com.br> * 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 |