Minor bug in CHOOSE (rev. 6975)

[Snorre]

Hello Tim,

Therefore I'd call it a minor bug (maybe more an inconvenience) and had never even noticed if I hadn't accidently hit the user key twice and got curious about the second choose box popping up.
I tried the same with an input form, but that rejected to open another one while the first was still open. Also, [View] and [Paste] won't show up while another choose box is waiting. Maybe there's a check that could easily be adapted to user choose boxes too; something similiar to the PPL workaround

Code:

choosing:=0;
EXPORT MYCHOOSE(selection,title,options)
BEGIN
  IF choosing THEN RETURN 0; END;
  choosing:=1;
  CHOOSE(selection,title,options);
  choosing:=0;
  RETURN selection;
END;

(The downside: slightly different semantics and doesn't help with Prime-internal choose boxes)

Greetings