aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/term
diff options
context:
space:
mode:
authorYAMAMOTO Mitsuharu2007-08-27 08:33:14 +0000
committerYAMAMOTO Mitsuharu2007-08-27 08:33:14 +0000
commita225da012cf8f41c6978dc2fd884be23792adb76 (patch)
tree204b18be6678fc1da7d4b9d35bcdcd4a2bba9259 /lisp/term
parenta186cc54a2edf492b8dd4c615af7872e0e0c4e58 (diff)
downloademacs-a225da012cf8f41c6978dc2fd884be23792adb76.tar.gz
emacs-a225da012cf8f41c6978dc2fd884be23792adb76.zip
(mac-handle-toolbar-switch-mode): Add explicit
argument to tool-bar-mode call.
Diffstat (limited to 'lisp/term')
-rw-r--r--lisp/term/mac-win.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/term/mac-win.el b/lisp/term/mac-win.el
index 2e03b8517b5..314989906dd 100644
--- a/lisp/term/mac-win.el
+++ b/lisp/term/mac-win.el
@@ -1785,12 +1785,12 @@ Currently the `mailto' scheme is supported."
1785 "Toggle visibility of tool-bars in response to EVENT. 1785 "Toggle visibility of tool-bars in response to EVENT.
1786With no keyboard modifiers, it toggles the visibility of the 1786With no keyboard modifiers, it toggles the visibility of the
1787frame where the tool-bar toggle button was pressed. With some 1787frame where the tool-bar toggle button was pressed. With some
1788modifiers, it changes global tool-bar visibility setting." 1788modifiers, it changes the global tool-bar visibility setting."
1789 (interactive "e") 1789 (interactive "e")
1790 (let ((ae (mac-event-ae event))) 1790 (let ((ae (mac-event-ae event)))
1791 (if (mac-ae-keyboard-modifiers ae) 1791 (if (mac-ae-keyboard-modifiers ae)
1792 ;; Globally toggle tool-bar-mode if some modifier key is pressed. 1792 ;; Globally toggle tool-bar-mode if some modifier key is pressed.
1793 (tool-bar-mode) 1793 (tool-bar-mode 'toggle)
1794 (let ((frame (mac-ae-frame ae))) 1794 (let ((frame (mac-ae-frame ae)))
1795 (set-frame-parameter frame 'tool-bar-lines 1795 (set-frame-parameter frame 'tool-bar-lines
1796 (if (= (frame-parameter frame 'tool-bar-lines) 0) 1796 (if (= (frame-parameter frame 'tool-bar-lines) 0)