From mboxrd@z Thu Jan  1 00:00:00 1970
Path: main.gmane.org!not-for-mail
From: Martin Stemplinger <mstemplingerNOSPAM@gmx.de>
Newsgroups: gmane.emacs.help
Subject: Re: Example using x-popup-menu needed
Date: Sat, 18 Oct 2003 15:45:39 +0200
Organization: Akademisches Sinfonie-Orchester Muenchen
Sender: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org
Message-ID: <uhe26y7zw.fsf@gmx.de>
References: <%aMjb.86442$gv5.44941@fed1read05>
	<EwUjb.65175$pv6.1917@twister.nyc.rr.com>
	<jwv7k33pr1s.fsf-monnier+gnu.emacs.help@vor.iro.umontreal.ca>
NNTP-Posting-Host: deer.gmane.org
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
X-Trace: sea.gmane.org 1066484789 1153 80.91.224.253 (18 Oct 2003 13:46:29 GMT)
X-Complaints-To: usenet@sea.gmane.org
NNTP-Posting-Date: Sat, 18 Oct 2003 13:46:29 +0000 (UTC)
Original-X-From: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Sat Oct 18 15:46:27 2003
Return-path: <help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org>
Original-Received: from monty-python.gnu.org ([199.232.76.173])
	by deer.gmane.org with esmtp (Exim 3.35 #1 (Debian))
	id 1AArPX-00005P-00
	for <geh-help-gnu-emacs@m.gmane.org>; Sat, 18 Oct 2003 15:46:27 +0200
Original-Received: from localhost ([127.0.0.1] helo=monty-python.gnu.org)
	by monty-python.gnu.org with esmtp (Exim 4.24)
	id 1AArOr-0005n9-PQ
	for geh-help-gnu-emacs@m.gmane.org; Sat, 18 Oct 2003 09:45:45 -0400
Original-Path: shelby.stanford.edu!newsfeed.stanford.edu!news-spur1.maxwell.syr.edu!news.maxwell.syr.edu!fu-berlin.de!uni-berlin.de!b0630.b.pppool.DE!not-for-mail
Original-Newsgroups: gnu.emacs.help
Original-Lines: 38
Original-NNTP-Posting-Host: b0630.b.pppool.de (213.7.6.48)
Original-X-Trace: news.uni-berlin.de 1066484629 27466957 213.7.6.48 (16 [177771])
X-URL: http://www.aso-muenchen.de
X-Attribution: Martin
Mail-Copies-To: never
User-Agent: Gnus/5.1002 (Gnus v5.10.2) Emacs/21.3.50 (windows-nt)
Cancel-Lock: sha1:pvPy5Vdu6OvNlVaDOkKap5+d62o=
Original-Xref: shelby.stanford.edu gnu.emacs.help:117393
Original-To: help-gnu-emacs@gnu.org
X-BeenThere: help-gnu-emacs@gnu.org
X-Mailman-Version: 2.1.2
Precedence: list
List-Id: Users list for the GNU Emacs text editor  <help-gnu-emacs.gnu.org>
List-Unsubscribe: <http://mail.gnu.org/mailman/listinfo/help-gnu-emacs>,
	<mailto:help-gnu-emacs-request@gnu.org?subject=unsubscribe>
List-Archive: <http://mail.gnu.org/pipermail/help-gnu-emacs>
List-Post: <mailto:help-gnu-emacs@gnu.org>
List-Help: <mailto:help-gnu-emacs-request@gnu.org?subject=help>
List-Subscribe: <http://mail.gnu.org/mailman/listinfo/help-gnu-emacs>,
	<mailto:help-gnu-emacs-request@gnu.org?subject=subscribe>
Errors-To: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org
Xref: main.gmane.org gmane.emacs.help:13324
X-Report-Spam: http://spam.gmane.org/gmane.emacs.help:13324

On Fr Okt 17 2003 at 22:14, Stefan Monnier <monnier@iro.umontreal.ca> wrote:

> You mean (x-popup-menu
>           t (list menu-title
>                   (cons menu-title
>                         (mapcar (lambda (item)
>                                   (if (consp item) item
>                                     (cons item item)))
>                                 item-list))))
>
>
> You mean
>
>   (call-interactively
>    (choose-from-menu "Commands"
>                      '(("Copy             C-insert" . copy-region-as-kill)
>                        ("Goto Line"                 . goto-line)
>                        ("Paste/Yank       S-insert" . yank)
>                        ("Redo"                      . redo)
>                        ("Search Files"              . grep)
>                        ("Undo             C-_"      . undo)
>                        ("Word Completion  M-/"      . dabbrev-expand))))
>
>>    (global-set-key [mouse-3] 'right-popup)
>
> If you define `right-popup' as a menu keymap, you'll save yourself
> the trouble of calling the commands and you'll get the hotkeys for free.
>
>
>         Stefan

Would you mind to post a complete example? I tried to insert your code
but obviously made some mistake :-(

Thanks
Martin
-- 
Remove NOSPAM to reply by mail