[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: `posn-at-point' and `posn-at-x-y' not in manual

From: Masatake YAMATO
Subject: Re: `posn-at-point' and `posn-at-x-y' not in manual
Date: Sat, 05 Jun 2004 02:11:54 +0900 (JST)

> Thank you, sir. 
> However, I'd like not to move the mouse cursor if possible.
> I've implemented `point-pixel-position' based on your code.
> Maybe this code is applicable to popup menu.

Here is the example:

(let* ((pos (posn-at-point))
       (x-y (posn-x-y pos))
       (wnd (posn-window pos)))
  (popup-menu (list nil "eval-after-load" "eval-and-compile" "eval-buffer" 
"eval-current-buffer" "eval-defun")
              (list (list (car x-y)
                          (cdr x-y))

May be useful to show completion candidate.

Masatake YAMATO

reply via email to

[Prev in Thread] Current Thread [Next in Thread]