Question about menu-choose-command...

• To: clim@BBN.COM
• Subject: Question about menu-choose-command...
• From: Michael Montag <montag@ztivax.siemens.com>
• Date: Mon, 9 Sep 91 21:25:24 +0200

Reading the manual for CLIM 1.0 I thought evaluating


(setq *root*  (clim:open-root-window :clx))

(clim:define-command (item1 :menu t :command-table clim:user-command-table)
                     () (print 1))
(clim:define-command (item2 :menu t :command-table clim:user-command-table)
                     () (print 2))

(clim:menu-choose-command-from-command-table
  'clim:user-command-table
  :associated-window *root*)


should pop up a menu with 'item1' and 'item2' in it.
Then depending on my choice the last form should return (not execute!) the
corresponding command.

What happens is:
The menu pops up, but the items are not mouse-sensitive. Clicking inside the
menu hasn't any effect. Clicking outside the menu returns NIL.


Another problem:

Why does

(clim:menu-choose '(item1 item2 item3) :label "Your Choice:"
		  :associated-window *root*)

ignore the :label option. It is also ignored in the
clim:accepting-values function.

My working environment is:
SUN Sparc 1+, Open Windows 2.0, Allegro CL 4.0.1, CLIM 1.0


Are that known problems or is something wrong with my thinking or program?


Michael Montag

0,,

• Question about menu-choose-command...
• From: Scott McKay <SWM@sapsucker.scrc.symbolics.com>

• Prev: Emulation of TV: menu functions
• Next: Question about menu-choose-command...
• Index: CLIM Mailing list (5-Oct-90 to 31-Dec-91)
• Thread: CLIM Mailing list Index (5-Oct-90 to 31-Dec-91)