(mac-handle-toolbar-switch-mode): Add explicit

argument to tool-bar-mode call.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 7a977672a22fb78bf9ec96aaa6bf455c13ad2f4f..1bfbc6f346061f1725b26f1382325fe7b2312a07 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2007-08-27  YAMAMOTO Mitsuharu  <mituharu@math.s.chiba-u.ac.jp>
+
+       * term/mac-win.el (mac-handle-toolbar-switch-mode): Add explicit
+       argument to tool-bar-mode call.
+
 2007-08-27  Glenn Morris  <rgm@gnu.org>
 
        * diff-mode.el (diff-find-file-name): Only accept regular files,

diff --git a/lisp/term/mac-win.el b/lisp/term/mac-win.el
index 2e03b8517b504732fff231c1e0b50a7bce2b96ae..314989906dd6d95f3ee00c6452df14d3be7f4bfa 100644 (file)
--- a/lisp/term/mac-win.el
+++ b/lisp/term/mac-win.el
@@ -1785,12 +1785,12 @@ Currently the `mailto' scheme is supported."
   "Toggle visibility of tool-bars in response to EVENT.
 With no keyboard modifiers, it toggles the visibility of the
 frame where the tool-bar toggle button was pressed.  With some
-modifiers, it changes global tool-bar visibility setting."
+modifiers, it changes the global tool-bar visibility setting."
   (interactive "e")
   (let ((ae (mac-event-ae event)))
     (if (mac-ae-keyboard-modifiers ae)
        ;; Globally toggle tool-bar-mode if some modifier key is pressed.
-       (tool-bar-mode)
+       (tool-bar-mode 'toggle)
       (let ((frame (mac-ae-frame ae)))
        (set-frame-parameter frame 'tool-bar-lines
                             (if (= (frame-parameter frame 'tool-bar-lines) 0)