From mboxrd@z Thu Jan 1 00:00:00 1970 Path: main.gmane.org!not-for-mail From: David PONCE Newsgroups: gmane.emacs.devel Subject: Re: `posn-at-point' and `posn-at-x-y' not in manual Date: Fri, 4 Jun 2004 16:37:08 +0200 (CEST) Sender: emacs-devel-bounces+emacs-devel=quimby.gnus.org@gnu.org Message-ID: <6581542.1086359828010.JavaMail.www@wwinf0603> Reply-To: david.ponce@wanadoo.fr NNTP-Posting-Host: deer.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=iso-8859-1 Content-Transfer-Encoding: 7bit X-Trace: sea.gmane.org 1086359852 26657 80.91.224.253 (4 Jun 2004 14:37:32 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Fri, 4 Jun 2004 14:37:32 +0000 (UTC) Cc: emacs-devel@gnu.org Original-X-From: emacs-devel-bounces+emacs-devel=quimby.gnus.org@gnu.org Fri Jun 04 16:37:26 2004 Return-path: Original-Received: from quimby.gnus.org ([80.91.224.244]) by deer.gmane.org with esmtp (Exim 3.35 #1 (Debian)) id 1BWFp0-0002wX-00 for ; Fri, 04 Jun 2004 16:37:26 +0200 Original-Received: from lists.gnu.org ([199.232.76.165]) by quimby.gnus.org with esmtp (Exim 3.35 #1 (Debian)) id 1BWFoz-00051e-00 for ; Fri, 04 Jun 2004 16:37:25 +0200 Original-Received: from localhost ([127.0.0.1] helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.33) id 1BWFpN-0000Ka-To for emacs-devel@quimby.gnus.org; Fri, 04 Jun 2004 10:37:49 -0400 Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.33) id 1BWFpL-0000KU-Se for emacs-devel@gnu.org; Fri, 04 Jun 2004 10:37:48 -0400 Original-Received: from exim by lists.gnu.org with spam-scanned (Exim 4.33) id 1BWFpK-0000KH-4P for emacs-devel@gnu.org; Fri, 04 Jun 2004 10:37:47 -0400 Original-Received: from [199.232.76.173] (helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.33) id 1BWFpK-0000KE-0z for emacs-devel@gnu.org; Fri, 04 Jun 2004 10:37:46 -0400 Original-Received: from [193.252.22.25] (helo=mwinf0601.wanadoo.fr) by monty-python.gnu.org with esmtp (Exim 4.34) id 1BWFoj-0005qr-Jh for emacs-devel@gnu.org; Fri, 04 Jun 2004 10:37:09 -0400 Original-Received: from wwinf0603 (wwinf0603 [172.22.137.30]) by mwinf0601.wanadoo.fr (SMTP Server) with ESMTP id 2D3C93400336; Fri, 4 Jun 2004 16:37:08 +0200 (CEST) Original-To: jet@gyve.org X-Originating-IP: [194.2.245.141] X-WUM-FROM: |~| X-WUM-TO: |~| X-WUM-CC: |~| X-WUM-REPLYTO: |~| X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.1.4 Precedence: list List-Id: "Emacs development discussions." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-devel-bounces+emacs-devel=quimby.gnus.org@gnu.org Xref: main.gmane.org gmane.emacs.devel:24532 X-Report-Spam: http://spam.gmane.org/gmane.emacs.devel:24532 Masatake YAMATO wrote: >>Of course! Thanks! >>As an example, here is an implementation of a `set-mouse-at-point' >>function that seems to work very well :-) > > > How about tooltip? > Doctor, please show a sample. People wish your epiphany:-) > Here it is: (defun tooltip-show-at-point (text) "Display a tooltip with TEXT near cursor." (let* ((oP (mouse-pixel-position)) (tooltip-x-offset 0) (tooltip-y-offset (- (frame-char-height)))) (set-mouse-at-point) (tooltip-show text) (set-mouse-pixel-position (nth 0 oP) (nth 1 oP) (nthcdr 2 oP)) )) David