From: YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
Date: Mon, 27 Aug 2007 08:33:14 +0000 (+0000)
Subject: (mac-handle-toolbar-switch-mode): Add explicit
X-Git-Tag: emacs-pretest-22.1.90~892
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a225da012cf8f41c6978dc2fd884be23792adb76;p=emacs.git

(mac-handle-toolbar-switch-mode): Add explicit
argument to tool-bar-mode call.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 7a977672a22..1bfbc6f3460 100644
--- 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 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."
   "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)