#import "Briefcase.h"
#import "PrefDelegate.h"
#import <appkit/appkit.h>

@implementation PrefDelegate

- load:sender
{
    [saveAllSwitch setState:[owner saveAll]];
    [dumpAllSwitch setState:[owner dumpAll]];
    [delayForm setIntValue:[owner delay]];
    [delayForm selectText:self];
    
    return self;
}

- set:sender
{
    [owner setSaveAll:[saveAllSwitch state]];
    [owner setDumpAll:[dumpAllSwitch state]];
    [owner setDelay:[delayForm intValue]];
    [delayForm selectText:self];
    
    return self;
}

- setDelayForm:anObject
{
	delayForm = anObject;
    [[delayForm cellAt:0 :0] setEntryType:NX_POSINTTYPE];
	return self;
}

@end
