GGUserProfile.mesa
Copyright Ó 1986, 1992 by Xerox Corporation. All rights reserved.
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.