<> <> <> <> DIRECTORY CD, CDSequencer, Rope; CDCommandOpsExtras2: CEDAR DEFINITIONS = BEGIN <<>> <> RegisterWithMenu: PROC [menu: REF_NIL, entry: Rope.ROPE_NIL, doc: Rope.ROPE_NIL, key: ATOM_NIL, proc: CDSequencer.CommandProc_NIL, queue: CDSequencer.QueueMethod_doQueue, tech: CD.Technology_NIL]; <<--pure conveniance>> <<--Fetches a menu, installs an entry and implements a command with CDSequencer>> <<--menu: pop-up menu, or NIL >> <<--entry: entry line for pop up menu >> <<--doc: documentation >> <<--key: command key (as in tip table, pop-up menu) >> <<--proc #NIL: registers proc with CDSequencer >> <<--proc NIL: registration of menu entry only >> <<--queue: method how proc is called>> <<--tech: (NIL for all technologies); used for command registration but not for menu>> <<--There are two classes of tools>> <<-- Standard tools register commands with CDSequencer, >> <<-- they do not make PopUp menus themself >> <<-- Fancy tools might not be included in the PopUp menu table file >> <<-- they might consider registering a menu themself, after they are loaded >> END.