Gnus development mailing list
 help / color / mirror / Atom feed
* (void-function popup-menu)
@ 2003-04-29 14:42 Paul Stevenson
  2003-04-29 16:16 ` Simon Josefsson
  0 siblings, 1 reply; 3+ messages in thread
From: Paul Stevenson @ 2003-04-29 14:42 UTC (permalink / raw)


Signaling: (void-function popup-menu)
  (popup-menu gnus-mime-button-menu nil prefix)
  (let ((pos ...)) (select-window (posn-window pos)) (goto-char
  (posn-point pos)) (gnus-article-check-buffer) (popup-menu
  gnus-mime-button-menu nil prefix))
  (save-window-excursion (let (...) (select-window ...) (goto-char
  ...) (gnus-article-check-buffer) (popup-menu gnus-mime-button-menu
  nil prefix)))
  gnus-mime-button-menu((down-mouse-3 (#<window 88 on *Article*> 1183
  (232 . 365) -103500897)) nil)
  call-interactively(gnus-mime-button-menu)






^ permalink raw reply	[flat|nested] 3+ messages in thread

* Re: (void-function popup-menu)
  2003-04-29 14:42 (void-function popup-menu) Paul Stevenson
@ 2003-04-29 16:16 ` Simon Josefsson
  2003-04-29 16:46   ` Paul Stevenson
  0 siblings, 1 reply; 3+ messages in thread
From: Simon Josefsson @ 2003-04-29 16:16 UTC (permalink / raw)
  Cc: ding

Paul Stevenson <paul@gleet.org.uk> writes:

> Signaling: (void-function popup-menu)
>   (popup-menu gnus-mime-button-menu nil prefix)
>   (let ((pos ...)) (select-window (posn-window pos)) (goto-char
>   (posn-point pos)) (gnus-article-check-buffer) (popup-menu
>   gnus-mime-button-menu nil prefix))

Did you byte compile gnus?  gnus-art.el contains:

(eval-when-compile
  (define-compiler-macro popup-menu (&whole form
					    menu &optional position prefix)
    (if (and (fboundp 'popup-menu)
	     (not (memq 'popup-menu (assoc "lmenu" load-history))))
	form
      ;; Gnus is probably running under Emacs 20.
      `(let* ((menu (cdr ,menu))
	      (response (x-popup-menu
			 t (list (car menu)
				 (cons "" (mapcar (lambda (c)
						    (cons (caddr c) (car c)))
						  (cdr menu)))))))
	 (if response
	     (call-interactively (nth 3 (assq response menu))))))))




^ permalink raw reply	[flat|nested] 3+ messages in thread

* Re: (void-function popup-menu)
  2003-04-29 16:16 ` Simon Josefsson
@ 2003-04-29 16:46   ` Paul Stevenson
  0 siblings, 0 replies; 3+ messages in thread
From: Paul Stevenson @ 2003-04-29 16:46 UTC (permalink / raw)


Simon Josefsson <jas@extundo.com> writes:

> Paul Stevenson <paul@gleet.org.uk> writes:
>
>> Signaling: (void-function popup-menu)
>>   (popup-menu gnus-mime-button-menu nil prefix)
>>   (let ((pos ...)) (select-window (posn-window pos)) (goto-char
>>   (posn-point pos)) (gnus-article-check-buffer) (popup-menu
>>   gnus-mime-button-menu nil prefix))
>
> Did you byte compile gnus?  gnus-art.el contains:

Hmm. Well I thought I did.  The lisp dir has maybe only half of its
.el file having corresponding .elc files.  I probably didn't inspect
the results of make closely enough.

thanks,
Paul



^ permalink raw reply	[flat|nested] 3+ messages in thread

end of thread, other threads:[~2003-04-29 16:46 UTC | newest]

Thread overview: 3+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2003-04-29 14:42 (void-function popup-menu) Paul Stevenson
2003-04-29 16:16 ` Simon Josefsson
2003-04-29 16:46   ` Paul Stevenson

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).