Path: utzoo!utgpu!jarvis.csri.toronto.edu!mailrus!tut.cis.ohio-state.edu!rutgers!cmcl2!lanl!lambda!roberts
From: roberts@studguppy.lanl.gov (Doug &)
Newsgroups: comp.emacs
Subject: Re: Can I do pop-up menus in gnumacs?
Message-ID: <ROBERTS.89Mar16145503@studguppy.lanl.gov>
Date: 16 Mar 89 21:55:03 GMT
References: <MGH.89Mar10080939@intelob.intel.com>
Sender: news@lanl.gov
Distribution: comp
Organization: Los Alamos National Laboratory
Lines: 61
In-reply-to: mgh@intelob.intel.com's message of 10 Mar 89 13:09:39 GMT

In article <MGH.89Mar10080939@intelob.intel.com> mgh@intelob.intel.com (Mike Heavin) writes:

   Path: lanl!hc!lll-winken!lll-lcc!ames!oliveb!intelca!mipos3!omepd!mgh
   From: mgh@intelob.intel.com (Mike Heavin)
   Newsgroups: comp.emacs
   Date: 10 Mar 89 13:09:39 GMT
   Sender: news@omepd.UUCP
   Distribution: comp
   Organization: BiiN Information Systems, Hillsboro, Oregon
   Lines: 15


   I used to use the Unipress Emacs editor (bite my tongue).  One of the features
   I liked was the ability to create pop-up menus from which I could select an
   item that was, in turn, mapped to some emacs command.  I can't seem to find
   anything like that in gnumacs?

   Any suggestions?

   ----------------******************---------------------
   Mike Heavin

   These ramblings do not necessarily reflect the views of my employer, my spouse,
   my friends, or any other sentient being.  They are mine alone; I am my own
   worst enemy.
   ----------------******************---------------------


It's easy. I'll include a menu definition file that I wrote/modified.

  (defmenu ispell-menu
    ("Ispell Word" ispell-word)
    ("Ispell Buffer" ispell-buffer))

  (defmenu emacs-menu
    ("Emacs Menu")
    ("Stuff Selection" sun-yank-selection)
    ("Buffer Menu" buffer-menu nil)
    ("Rmail" rmail)
;;    ("Buffer Menu" electric-buffer-list nil)
    ("Ispell" . ispell-menu)
    ("Expand" . expand-menu)
    ("Delete Window" . delete-window-menu)
    ("Previous Buffer" mouse-select-previous-buffer *menu-window*)
    ("Save Buffers" save-some-buffers)
    ("List Directory" list-directory nil)
    ("Dired" dired nil)
    ("Mouse Help" . mouse-help-menu)
    ("Quit" . emacs-quit-menu))


--

===============================================================
Douglas Roberts
Los Alamos National Laboratory
Box 1663, MS F-602
Los Alamos, New Mexico 87545
(505)667-4569
dzzr@lanl.gov
===============================================================