File: DefaultNutUtilities.mesa
Created by: Butler on June 15, 1984 2:26:41 pm PDT
Last edited by:
Butler, June 27, 1984 3:48:44 pm PDT
DIRECTORY
DB,
ViewerClasses,
Buttons;
DefaultNutUtilities: CEDAR DEFINITIONS =
BEGIN OPEN DB;
FieldHandle: TYPE = REF FieldObject;
FieldObject: TYPE = RECORD[ tuple: Relship, attribute: Attribute ];
Viewer: TYPE = ViewerClasses.Viewer;
ProcessSelection: Buttons.ButtonProc;
--A standard ButtonProc that assumes the button's REF ANY data is the FieldHandle above.
--Insures attribute of tuple is entity-valued and non-NIL, then calls Nut.Display on it.
Reset: PROCEDURE [eName, domain: ROPE, seg: DB.Segment, viewer: Viewer];
--Resets contents of editor to its statebefore edits started.
Edit: PROCEDURE [eName, domain: ROPE, seg: DB.Segment, parent: Viewer];
--Invoked when hit the "Edit" button on the default displayer.
--Should replace the displayer viewer with an editor viewer.
END. . .