(tool-bar-help): Use `mouse-pixel-position'.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 58d10200e9ff2cb3e58a6c1b6e3a91621f9fae40..9646f0d3f4dbbfbf9909707248c2eb32c93300f8 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2000-09-27  Miles Bader  <miles@lsi.nec.co.jp>
+
+       * toolbar/tool-bar.el (tool-bar-help): Use `mouse-pixel-position'.
+
 2000-09-22  Kenichi Handa  <handa@etl.go.jp>
 
        * international/quail.el (quail-help): The output message is

diff --git a/lisp/toolbar/tool-bar.el b/lisp/toolbar/tool-bar.el
index 9bb60e2082904a5cd42306a6e86558b25c3cb930..004a0a372c88493d46e686a4592612504fabdf74 100644 (file)
--- a/lisp/toolbar/tool-bar.el
+++ b/lisp/toolbar/tool-bar.el
@@ -155,7 +155,7 @@ PROPS is a list of additional properties to add to the binding."
 (defun tool-bar-help ()
   "Pop up the help menu from the tool-bar."
   (interactive)
-  (let* ((p (mouse-position))
+  (let* ((p (mouse-pixel-position))
         (menu menu-bar-help-menu)
         (selection (x-popup-menu (list (list (cadr p) (cddr p)) (car p))
                                  menu))