// FileRetrieverView.m
// By Charles G. Fleming and Judy D. Halchin, 
// Educational Computing Services, Allegheny College.
// Copyright 1992, 1993 Allegheny College
// You may freely copy, distribute and reuse this code. 
// Allegheny College and the authors disclaim any warranty of any kind, 
// expressed or implied, as to its fitness for any particular use.
// This work was partially supported by a grant from the Pew Charitable Trusts
// and by an NSF Teacher Preparation Grant.

#import <apps/InterfaceBuilder.h>

#import "FileRetrieverView.h"

@implementation FileRetrieverView

// This is sent from FileSaverAndRetriever's (subclass of IBPalette) 
// finishInstantiate method.
- setNXImage:(NXImage *)retrieverNXImage
{
	fileRetrieverNXImage = retrieverNXImage;
	return self;
}

// Display the partially transparent NXImage in the palette window.
- drawSelf:(const NXRect*)rects :(int)count
{
	PSsetgray(1.0);
	PSsetalpha(0.0);
	NXRectFill(&bounds);
	[fileRetrieverNXImage composite:NX_SOVER toPoint:&bounds.origin];
	return self;
}
@end
