From a225da012cf8f41c6978dc2fd884be23792adb76 Mon Sep 17 00:00:00 2001 From: YAMAMOTO Mitsuharu Date: Mon, 27 Aug 2007 08:33:14 +0000 Subject: [PATCH] (mac-handle-toolbar-switch-mode): Add explicit argument to tool-bar-mode call. --- lisp/ChangeLog | 5 +++++ lisp/term/mac-win.el | 4 ++-- 2 files changed, 7 insertions(+), 2 deletions(-) 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 + + * term/mac-win.el (mac-handle-toolbar-switch-mode): Add explicit + argument to tool-bar-mode call. + 2007-08-27 Glenn Morris * 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) -- 2.39.2