From 8a2e0b2a692dfee47dcec6f77b39210ae511db35 Mon Sep 17 00:00:00 2001 From: YAMAMOTO Mitsuharu Date: Mon, 27 Aug 2007 08:30:37 +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 a977ef4e970..cc03224e2dc 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 b9f28323694..e39e1fffeb0 100644 --- a/lisp/term/mac-win.el +++ b/lisp/term/mac-win.el @@ -1798,12 +1798,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.5