[_CDMiwok_01_]<cedarcommon2.0>Gargoyle>GGUserProfile.mesa!1

GGUserProfile.mesa

Last edited by Bier on October 14, 1986 8:54:57 pm PDT

Contents: Routines for reading the Gargoyle entries in the user profile and setting Gargoyle options.

ImplementationHint: GGUserImpl.mesa

DIRECTORY

GGModelTypes, UserProfile;

GGUserProfile: CEDAR DEFINITIONS =

BEGIN

FontData: TYPE = GGModelTypes.FontData;

LookAtProfile: UserProfile.ProfileChangedProc;

Set the gargoyle defaults from the current user profile.

Gargoyle-wide state (applies at Viewer creation time).

SetDefaultHeuristics: PROC [on: BOOL];

GetDefaultHeuristics: PROC RETURNS [on: BOOL];

SetDefaultGravityExtent: PROC [inches: REAL];

GetDefaultGravityExtent: PROC RETURNS [screenDots: REAL];

SetDefaultUseLatestIPVersion: PROC [useLatestIPVersion: BOOL];

GetDefaultUseLatestIPVersion: PROC [] RETURNS [useLatestIPVersion: BOOL];

SetDefaultDefaultFont: PROC [font: FontData];

GetDefaultDefaultFont: PROC RETURNS [font: FontData];

SetAutoOpenTypescript: PROC [autoOpenTypescript: BOOL];

GetAutoOpenTypescript: PROC [] RETURNS [autoOpenTypescript: BOOL];

SetAutoOpenHistory: PROC [autoOpenHistory: BOOL];

GetAutoOpenHistory: PROC [] RETURNS [autoOpenHistory: BOOL];

SetDefaultHistorySize: PROC [defaultHistorySize: INT];

GetDefaultHistorySize: PROC RETURNS [defaultHistorySize: INT];

SetAutoScriptingOn: PROC [autoScriptingOn: BOOL];

GetAutoScriptingOn: PROC [] RETURNS [autoScriptingOn: BOOL];

SetSeparateControlPanel: PROC [separateControlPanel: BOOL];

GetSeparateControlPanel: PROC [] RETURNS [separateControlPanel: BOOL];

SetDefaultIncludeIPByValue: PUBLIC PROC [defaultIncludeByValue: BOOL];

GetDefaultIncludeIPByValue: PUBLIC PROC [] RETURNS [defaultIncludeByValue: BOOL];

SetHoldThatTiger: PROC [holdThatTiger: BOOL];

GetHoldThatTiger: PROC [] RETURNS [holdThatTiger: BOOL];

SetNewBoxesUnfilled: PROC [newBoxesUnfilled: BOOL];

GetNewBoxesUnfilled: PROC [] RETURNS [newBoxesUnfilled: BOOL];

END.